

DISCOLOGY 



POUR VOUS SURPASSER 

3 Programmes en 1 
pour votre Amstrad CPC 



L'EDITEUR: 

Un Editeur universel de secteurs et de fichiers. Grâce à sa boîte à outils 
exceptionnelle, (Désassembleur, Calculatrice, Lisleur Basic,.,) tout devient possible. 

LE COPIEUR: 

Un Copieur intégral pour la sauvegarde de vos disquettes et cassettes. 
Il vous étonnera par ses performances et sa simplicité d'utilisation 

L'EXPLOREUR : 

Un grophique animé e 
disquettes. Un prograf 

LES 7 POINTS FORTS DE DISCOLOGY 

> ta facilité : Grâce aux Fenêtres, oui Menus Déroulonts et à l'Aide Intégrée. 

> Lo vitesse; 160 Ko de Langage Machine pur! 

> La documentation : Un Manuel complet et une notice lechnique approfondie. 

> La compatibilité : Il gère toutes les extensions mémoire et les lecteurs 5 1 4 pouces. 

> La performance : Incroyable et absolue. 

> L'inédit : Ou vraiment jamais vu ! 

> La référence : Des milliers d'utilisateurs enthousiastes en Fronce comme 

à l'Etranger. DISCOLOGY est reconnu et acclamé par lo presse internationale. 



Temps Réel" qui voi 
me sans équivalent. 



r MERIDIEN Informatique S .1 7, La ton.blèr. 13001 Mar»IIU Ml. : 91.94.1S.53 



BON DE COMMANDE Vewtai s.i pour Amstrad cpc 

, „,„„.„„„ , nFnr Disponlbillto immédiate. 

□ Je commande DISCOLOGY au prix de 350 F 

□ Je commande Master SoveV 3.2 (Copieur seul) au prix de 190F Je règle ma commande: 

□ Je possède déjà Master Save et je commande DISCOLOGY. □ par chèque joint (port gratuit) 

Je joins ma disquette Master Save et je ne paye que 160 F D contre-remboursement (+ 30 F de frais de port) 



_g 



Nom: . 



Prénom : 



Code Postal : 



Tel.: 



A retourner à MERIDIEN Informatique - 5 et 7, La Canebière - 13001 MARSEILLE 



M tVERC 



ACTUALITE 



Sfmi 




A part Indîana Jones version aventure 
qui devrait être là au moment où je 
vous parle, on attend une autre 
adaptation de film : les Incorruptibles. 
Elliot Ness et Al Capone se livrent 
toujours une bataille inouie. Puisque 
nous sommes dans les films, tenez voilà 
Batman qui est annoncé à grands fracas 
par Océan. Batman le jeu reprendra 
l'intrigue de Batman le film sur cinq 
niveaux différents. Le premier nous 
placera dans une usine de produits 
chimiques et vous lancera à la poursuite 
de celui qui va devenir le Joker. Tout 
cela pour se terminer dans la cathédrale 
de Gotham City avec une confrontation 
ultime entre la chauve-souris et le Joker. 
Rassurez-vous il y aura aussi la 
Batmobile et le Batwing. 

TM of DC Comics Inc. © 1989 










jÊ$ 


ALLO 
AMSTAR & CPC 




m 


\ttention, notez bien ce qui suit : 
Dès le mois de septembre, tous les mercredis 
ie 14 h à 17 h, la rédaction se tiendra à votre 
iisposition au 99 52 98 11 pour tous renseigne- 
nents techniques. En dehors de ce créneau les 
éponses techniques se feront par courrier (n'ou- 
bliez pas de mentionner votre adresse et joignez 
an timbre pour la réponse) ou bien par Minitel 
»ur le 3615 code: MHZ. 






Virgin Games 



Une grande nouvelle : les Monty Python vont être adaptes en jeu 
video!. Peut-être une mauvaise nouvelle : comment va être traduit 
l'humour si particulier de l'équipe britannique. Concernant ce 
second point on est un peu rassuré car les personnes qui vont se 
charger de cette adaptation sont des passionnés du "Flying Circus». 
Alors, si une hirondelle d'Europe ne fait pas le printemps... 



VIRGIN MASTERTRONIC LTD 
UO Campden UÎU Road 
LONDON W8 7AR 




(mïcromanïâ) 


HIT PARADE 
AMSTRAD 464-6128 


N' 

DE CE 
MOIS 


TITRE 




1 


LES JUSTICIERS IOrogmN.r.,0. 
Robotop. Rambo 3) Océan 


NEW 


2 


INDIANA JONES 
USGold 


NE* 


3 


VIGILANTE 
US Cold 


3 


4 


DOUBLE DETENTE 

Océan 


1 


5 


FORGOTTI N WORLDS 

Captom 


1 


6 


BARBARIAN 2 
Palace 


4 


7 


NEW ZEALAND STORY 

Océan 


'.; .'. 


8 


STORMLORD 


8 


9 


SUPER SCRAMBBLE 


•.;.'. 


10 


OPERATION WOLF 

Ocaon 


il 


11 


CRAZYCARS 2 NEW 


12 


RENEGADE 3 

Oeeon 


NEW 


13 


GARY LINEKER HOT SHOT 
Gramfa 


lit 


14 


CHICAGO 90 

Mkroids 


NEW 


15 


SILKWORM 


NEW 


1 


f^mggjpjjpjj 


2 


OCEAN BEACH VOLLEY 

Oceon 


3 


CABAL 

Oceon 




4 


SHINOBI 

Virgin 




5 


RAINBOW ISLAND 


Vente par correspondance 

93.42.57.12 

Depuis PARIS 16.93.42.57.12 
MINITEL : 3615 MICROMANIA 


FORUM DES HALLES 

5, rue Pirouette Niveau 2 

Métro et RER Les Molles 45 OB 1 5 78 

PRINTEMPS HAUSSMAN : 

64, bd Houttmart, Espace Loisirs tout toi 

Métro Havre Caumaiiin 42 82 58 36 

NOUVEAU 

CENTRE COMMERCIAL GALAXIE 

PRINTEMPS ITALIE 

30. a. d'Itolle - Niveau 1 - Rayon Musique-Mitra 

Métro Place d'Italie 45 81 1 1 50 Poste 4 U 1 




loodcoac 



& * 

H 



" 



\t- ■ 



94000 Créteil 



discutez! Marchandez! 
mentez effrontément!!! 



- . !■■ MJ :î MCras 


\i i \... im ,_j-rFï ,wi - , Hr~ Ja*jjxj 


P^ ■■ 3il[^ _jÉÉ 



A 1 aubr, le |H>uplc tli* KU* 
(■tri- t ; t range M d'un nié 
riiît parmi eux. 



BUM)DWYCH, poi 



AlVJ 

CPC 



BBtii 




^ 



Ne payez plus pour acheter... 



05 05 13 00 



Starsoft vous offre l'appel. 








AMSTRAD 




PC & COMPATIBLES 


PROCHAINEMENT 






COMPILATIONS 






NEWS 




BLOODWICH 


89F 


139F 


SPECIAL ACTION 


119F 


179F 


BUFFALOBILL 


259 F 


DOUBLE DRAGON 


S9F 


139F 


WILLEB-CAFTBIOOO- 
HEUNDICATORS-OLYMPIC 
CHALLENGE 'SU.U 






CRAZYCARSII 


259 F 


KUU 


139F 


189F 






CURSeOF THE AZUR BOND 


317F 


LICENCE TD KILL 


95 F 


145 F 


BEST OF VOL II 


'29 F 


189 F 


FINAL FFIONTIER 


269 F 


MMC STATIONS 


95 F 


145 F 


FOOrHlLHMWSBI i 






H11SFAR 


288 F 


SOLEIL NOIR 


ND 


ND 


HOTSHOT-ZOMBl -TETAIS- 






KUU 


247 F 


SPHERICAL 


89 F 


139F 


LE NECROMANCIEN! 
ARCADE MUSCLE 


119F 


139 F 


LEGEND DU DJEL 


219F 


STARWARS TR1LOGY 


ND 


ND 


■STREET FIGHTER*- 






MOTORMASSACRE 


259 F 


TINTIN SUR LA LUNE 


139F 


189 F 


BIONIC COMMAND - 






NIL DIEU VIVANT 


298 F 


VIGILANTE 


89F 


139F 


ROADBLASTERS- 

1943- SlDE ABUS 
INCROWD 






PERMIS DE TUER 


259 F 


WEIRDDREAMS 


147 F 


197 F 


'33 F 


165F 


REDSTORMRISING 


299F 








iKARNOV-PREDATCfl- 






SENTINEL 


274 F 












GPVZOfl +TARGET RENEG ADE • 






STREET FIGHTER 


186F 




MEMBRES 






BAR8ARIAN-PLATOON- 






TEST DRIVE H 


275 F 




du CLUB... 






CHAZV CARS -COMBAT SCHOOLI 
GIANTS 


119F 


139F 


SCCAUF 


190F 




vous pou 
eommant 

24 h sur 


( .~ 






iGAUNTLETII- 






SC CARS 


190F 










CAUFQRNIA GAUES -OUTRUN. 






TOTAL ECLIPSE 


274 F 




24 






flOUING THUNDEfll 
DEFIS DE TAITO 

iTARGETRENEGAOf- 


139F 


194F 


TRIVIAL PURSUIT 
REVOLUTION FRANÇAISE 


288 F 




/ jours sur 


7 






ARKA'IOlOi-ARKANOIDH- 
BUBBLEBOBBLE'FLÏING 






WATERLOO 


259 F 








Le réponde 


jr: 






SHARU -SLPFIGHT- 






COMPILATION 






Un geste simple 






GAME SET & MATCH II 


103 F 


149 F 


ACES 

WlZBAU-roPGUN. 


229 F 












IMATCHOAY 2' CRICKET- 
BASttTU ASTER -SMXXEfl - 






ï™î- """""mil 


",' 












SWWANGON-aXF. 
CHAHPrONCHIPSFfllNTTRACKANO 






AFXAMMD • WDfiLD S€RIE 1 MSESAIU 










IELD 








NEWS 






COMMAND 






HIT PARADE 




m 


EWS AU PRIX STAR 








PERFORMANCE 

iMERCEWf-HARDBALL- 
ARMAGUED0NMAN-CHOL0- 


1 13 f 




688 SUBMARINE 
A8RAHAMS TANK 


288 F 

253 = 




C 


RAZY CARS II 


95F 1 


1F 






GAMES SUMMER EDIT 


89F 1 


3 F 




B08SLEIGHT.SHACKLED- 






BATTLE CHESS 


233 F 




INDIANA JONES 


85 F 1 


5F 




LEVIATMAN'XENO.TRANTORi 






CHESSMASTER210O 


398 F 




NIGELMANSELL 


77 F 122 F 










DOUBLE DRAGON 


189 F 




RICK DANGEROUS 


92 F 139 F 




HIT PARADE 






FI6COMBATF1LOT 


227 F 




SILK WORM 


82 F 122 F 




3 D GRAND PRIX 


114F 


144F 


F 19 


365 F 




SKATEBALL 


119F 149F 




AIRBORN RANGER 


'36F 


179F 


FASTBREAK 


24t f 




VIGILANTE 


89 F 115 F 




BLASTEROID 


37 F 


147 F 


FOOTBALL MANAGER II 


218F 




XYBOTS 


89 F 139 F 




CHUCK YEAGER 


37 F 


143F 


GRAND PRIX CIRCUIT 


259 F 






DRAGON NINJA 


89 F 


139F 


JET FIGHTER ADVENT 


371F 








GARY LINEKER HOTSHOT 




139F 


KING OUEST IV 


350 F 


BUTCHERHRI 


97 F 


147 F 


GUNSHIP 


139F 


179 F 


MANOIR DE MORTEVILLE 


221F 


FORGOTTEN WORLD 


93 F 


139 F 


HEROES OF THE LANCE 


94F 


198 F 


POLICE OUEST II 


259 F 


JACK MCKLAUS GOLF 


134F 


162 F 


LASTDUEL 


33 F 


139 F 


TITAN 


259 F 


NAVY MOVES 


97 F 


159 F 


LAST NINJA II 


115F 


143 F 






OBLITERATOR 
PERMIS DE TUER 
SOCCERSPEaACULAR 




147 F 
162 F 

186 F 


LE MAITRE ABSOLU 




187F 






109F 

141F 


LE MAITRE DES AMES 
OPERATION WOLF 
FACMANIA 


S3F 
33 F 


169 F 
139 F 
143 F 




fîîrrariîiiniTfm 






TIMESCANNER 
THESTORYSOFARV2 
TRIVIAL PURSUIT 


142 F 


149 F 
165 F 
250 F 


RAMBO III 
ROBOCOP 
TITAN 


m 

97 F 

127F 


139F 
137F 
167 F 




Un catalogue 
tout en couleurs 






REVOLUTION FRANÇAISE 






VINDICATORS 


B9F 


139F 


4 enaqut commartto 





Aie- cUeteUeg, phti-, 

Leé- Nouoeautéâ, au- meilUuA, plix- 

lotît cheq, StaA-ioj^ ! 



MINITEL 

3615 

Clubtel* 

STAR 



CONSOLES 


JOYSTICKS & PÉRIPHÉRIQUES 


XE-XL 




GALAXIAN 


90 F 


JOYSTICKS 


LA CONSOLE XE 


990 F 


GHOSTBUSTERS 


90F 


CRYSTAL 179 F 129 F 


AflCHON 


122 F 


GRAND PRIX 


110F 


JY2 59 F 


BALLBLAZER 


122 F 


JOUST 


90F 


QUICK SHOT 2 79 F 


CHOPUFTER 


124 F 


JUNGLE HUNT 


90F 


KONIX SPEEDKING 109 F 


COLONIAL CONQUEST 


314F 


KUNG FU SUPERKICKS 


110F 


PRO STANDARD 139 F 


DARK CHAMBERS 


150F 


PACMAN JR 


120F 


NAVIGATOR 149 F 


DONKEV KONG 
EASTERN FRONT 


149 F 
84F 


PC ENGINE NEC 

1300 KM GRAND PRIX 


474 F 


DISQUETTES VIERGES 


FRIGHT NIGHT 


144 F 


BIG MAN WORLD 


118F 


POUR AMSTRAD 


FOODFIGHT 


144F 


DEVIL HERO LEGEND 


531F 


10 DISQUETTES 3" 189 F 


FOOTBALL 


84F 


FI PILOT 


427 F 


5 DISQUETTES 3" 95 F 


JOUST 


84F 


FANTAZYZONE 


278 F 


POURAMIGAPC 


JUNGLE HUNT 


129 F 


GVARAGA88 


234 F 


10 DISQUETTES 3"l/2 109 F 


MIDNIGHT MAGIC 


150F 


KATO & KAN SHOW 


245 F 


10 DISQUETTES 5"l/4 66 F 


MOON PATROL 


90F 


MOTOR ROADER 


427 F 




STAFt RAIDERS 


124 F 


OVERHAULED MAN 


427 F 


BOITES DE RANGEMENT 


TENNIS 


94F 


P47 


542 F 


POUR 40 DISQUETTES 3" 3"1>2 89 F 


WAR GAME CONST. SET 


208 F 


PACLAND 


450 F 


80 DISQUETTES 129 F 






RTYPE 


336 F 


50 DISQUETTES 5"1 4 89 F 


ATARI 2600 




R TYPE II 


462 F 


100 DISQUETTES 129 F 


CONSOLE VOS 2600 


581F 


SPACE HALLIA 


289 F 




ASTEROIDS 
ASTROBLAST 
BASEBALL 
BATTLEZONE 


102 F 
118F 
118F 
90F 


VIGILANTE 

WORLD COURT TENNIS 

YAKATTOCHU-KI 


399 F 
474 F 
118F 




OFFRE 






BOXING 

CALIFORNIA GAMES 
CHESS 
CROSS BOWN 


102 F 
158F 
107 F 
122F 


TRÈS SOFT LA RENTREE! 


SPÉCIALE* 


CRYSTAL CASTLES 


115F 


i— ~^ 






DARK SHAMBERS 


122F 


->^ * 




4 tt*\ fi/ 


DEFENDER 


91F 






M I 1 vA» 


DESERT FALCON 


136F 






IL! /O 


DIG DUG 


102 F 


POUR UNE COMMANDE DE 




*\ê9 #w 


DOUBLE DUNK 
ENDURO 
F14T0MCAT 
FIRE FIGHTER 


134F 
110F 
139F 
1 10F 


2 LOGICIELS: 

LE STYLO PLUME l LE TROMBONE GËANT 

3 LOGICIELS: 

LE STYLO PLUME . LE TROMBONE GEANT 
* LA TROUSSE 


pour toute commande 
de 3 logiciels 


FOOTBALL SOCCER 


86 F 


OU LA REMISE DE 10 % 





BON DE COMMANDE N ° 609 (libellé en lettres majuscules) à retourner à : 



.- -..:•: .: 


TITRES 




.. 


>. 


PRIX 














(XeOUTOOMTOM In^fBn^M,».^ . «Fréta 




Payer par Caria Blaue 


:;:...'■.:■::;: 




_)aie d'eifjiralion / Stgriatme : 


cr 




EXPORT PHrn^IuM3nMrr>tCfnM<w<^UNK]U(MENT 

* La réduction de 10 % ne s applique pas sut les promotions!... 


TOTAL 





STARSOFT 



36237 IF J>AVU) THEH ù.i 1 > 

36238 IF JUWtll AHD C0ULEUfi=2 THEH C0=2 ) 
362*0 GÛSUB l&QOQ ; 
36250 HEIT J ) 

36255 IF IWE»=" " THEM GOSUB 6201S:CALL IAOOO:P1IHTI8 > 
:PBIHTIfl 

36256 SOUHb 1,300 > 
Jb2bO HEIT I ) 
36999 RETUBH > 
44ÛU0 BEA Calcul de Ûi el de ftE ; 
«4010 GI:0:GÏ=0:G2=Ù:H=Ù:RElM=0 > 
44Ù20 FOfi 1=0 Tû L: FOB J=0 Tû Mil i 
44025 M*I i 
««030 GMiïUTd.J) J 
44040 GÏGT.ÏTi l.J i ) 
MlfcO iJ2=GZ»ZT<l,Jl ; 
4*060 HEIT J:HEIT I ) 
44070 U<K>=GI/H ) 
44060 GTIKI^Ï/H ; 
44090 GZlKJ ■'.,: k ) 
44100 FQB 1-0 TO L:FQB JO TO H(l) ) 
44110 R = SOK (IITM.J) -ttlKHiUTH.J) GÏ(K) > » I ÏT( I , J ) G > 
ï(K)Ji<YT(l,J)GY(IOM<ZTllJ) -GZtKmiZTU.J) GZtOH 



44120 IF BEIKKB THEH HE<K) B 




m 


44130 HEIT J:HEIT 1 




* 


44999 BETUBH 




m 


62000 B£H CAME 




m 


62010 CL> 




>FE 


6201b" BOBiJFfi 14 




■iC 


62020 PLOT 0.0 




>W 


62030 bUM 639.0,3 




,LL 


h. D*i) DBAU 639.399.3 




>HP 


62060 DkAW 0,399.3 




.Lk 


62060 DBAtf 0,0,3 




>U 


62070 CO = 3 




•U 


b.ifeu fat rufeH 




m 


65000 ktfl Silsie caractère 




m 


65006 PBINT 




H» 


66010 PBIHT'Votre choli :* 




>B 


65020 Ct>"tCI'UKEf*!tF C*=" 


THEH 65020 


>FL 


66030 C=ASCtCI) 




>IF 


6&03S IF C=i3 QB C= 32 THEH C 


-27:GÛTQ 65060 


?Qi 


65O40 IF C/96 THEH C=C-96:G0TÛ 65060 


KM 


65050 IF U96 THEH C-C 64 




m 


65060 bliUHb 1,20,1 




-L1 


65535 BETUBH 




Mi 



OFFRE EXCEPTIONNELLE : 4 CASSETTES POUR 100 F !* 

Une cassette comprend les jeun, educatHs ou utilitaires qui ont été publiés dans le numéro CPC correspondant 



21 : Monnaie - Oiydo - Demo-lris - Slradamuse - Dis - Cas - Charge- 
ment des RSX Bankopen, Bankraad, Bankwme. Bankfind 
23 : Anti-erreurs - CAO 3D - 30 snafces - Photo-sprite - Reliel - Monheur. 
24: CAO 3D- Anti-erreurs- 1000 Bornes -Justification - Twenly 
Copy - Trames el collages - Graphotrance - Machines 
25 : CAO 3D - Amsrylhm - Trois des - Générateur de menus - Symé- 
trie -Générateur de sprites(1) - Pénètre* 

26: CAO 3D - Anti-erreurs -Catalogue - Conjugue- Tchernmis- 
land - Fenêtres symétriques - Graphiques. 

27 : Création el animation de sorties - Anti-erreurs - CAO 3D - Champion- 
nat - Actions 

28 : Anti-erreurs II - Routines machines - CAO 30 - Fichiers - Générateur 
de sortes - Catprog 

2B : Les lie hier s - Anti-erreurs 2- Astronomie planétaire - CAO 
3D - Catprog - Pentominos. 



3 : Char d'assaut - Consommation de carburant - Fonction arcle 

4 : Redef'car - Carré magique - Lexique anglais fiançais - Maze 

7 : Cherry Paint - Discut - Conjugaison - Calcul - CcJdftz - Double hauteur 
Référence croisée des variables basic 

8 : Cherry Paint - Tokext - Numérobgie - Discothèque 
8 : Cherry Paint - Creedala - Serpent Madness 

1 1 : Ciel - Cherry Paint - Casse-léte de fane - Medor - Mufti fichier 

12 : Cherry Paint - Mozart - Louisiane - Prot dise - Etik disk 

1 5 : Cherry Paint - Gemaine - Moniteur de disquette - Boite à rythmes. 

16 : Poker patience - Attentif - Menu 2+. 

20 : Reliel - Vision - Tri pour Bankmanager - Cal dsk - Poker. 



Je commande lots(s) de 4 cassettes à 100 F le lot 

Numéros des cassettes souhaitées : 

Si une des cassettes était épuisée, je désire à la place 
ta cassette n° : 



Prénom: 




' Dais la imite rfas stocks *spomWas 

"Ne pouvant èire tenu pour responsable de ('acheminement des paquets postaui. nous conseillons à notre aimable dienlèle ce choisir renvoi en recommandé' 
WRtcommMKM : ♦ 10 F) Oéitl minimum d» livtitor : f 5 Jour» à réception d> I. ci 




10 IF PEEXCUOOOKH THE» HEHOBY fcS800-l:LOAD*KIISTAXl* )HC 
:L0AD*aiSTU2 a :P0KE fcAOOO.l 

20 PEM 1 > UA 

30 ••t»»i«CDULEIJBS»»»» >LC 

40 DATA 14,24,3,6,15,0,11, 2,23,26,12,18,19,9,4,15 )NH 

50 FM A=0 TO l b : BEAD B:MC A,B:*I7:Ip* 12,0,26: IW 15 >Wf 
,26,0 

60 INITIALISATION»»» >LF 

70 COKE A90?B,15:POKE 19030, *0:CAU 1A067:D1H ECU (20, M >TE 
),SPI(20),LE(26> 

90 FOR A TO 19:Sn<A>=t57C0*(M64):NEXT:NlV=l:VIE=4:C >I¥ 
LE=0: BESTOBE 060 

90 FOR 4=0 TO 9:CH<A>=A5CC0MAi1fi] :NETT:FOR A=0 TO 4:LE >ZV 
(A*l)=l5D70HAM6):HEIT:F0fi M TO 2S:LE(A'I I 1S0TOM (A 
♦2)»16»:NETT 

100 GOSUB 2410:POKE U02B,15:P0KE t9030,40:CALL U067 >VE 
110 DOUE 0:B0BDE1 0:PAPEE 5:CLS:B1MD0M1,1,19,5,25:PAPE )QH 
B I1.0;CLSI1 

120 FOfi A=152 TO 468 STEP 4:H0VE A,3B6:DUW 0,-28,0:BE >KG 
IT:fcSPfllTE,20,l,k5F40:POKE U02B,16:P0KE lâ030,4:CALL I 
9067 

130 A^3:B-16;AI = *SC0RE":GOSUB 870:A=l2:A*='mSCOfiE m :GOS >D 
UB 870;A=22:AI^L!VESVG0SUB 870 :A=32:A*= "STAGE 1 :COSUB 
S70:A=30:B=4:AI- , KEYS':GOSUB 870 

140 L0=7:l=O:A=2:I=24:G0SUB 880:AM2:I=50000:COSU1 800: >ZU 
L0=5:1=4:A=22:G0SW 800:A=32; l=0:COSUB 890: L0=3: 4=35 :0= 
*:t=0;GOSUB B90:MIV=1 

150 '■■■«■DESSIN DE IASE»»i )K 

160 IF H1V=13 THEN PAPES H,5:CLSI1:A=1:B*4B:A*:"FELICI >FR 
TATIONVGOSUB 870: B=64:A*=" VOUS AVEZ RETROUVE": GOSUB 87 
0:B=80:4*=*TOUS LES KSISTAIS*: GOSUB 870: 8=96: A$= "SAUVE 
LE H0WE*:COSUB 870: 0=112 :AI= "ET DETIUIT LES HJTAMTSVC 
OSUB 87û:f,AU. IM06:NIV=1 

170 PAPES 11,0:0511 >MZ 

180 RESTOBE 3020: M 0,24:CLSIl:TAA=O:CL£=O:PAPEfi 0:LOC >VQ 
ATF 6,12:PEN 5:PRIHT'STA«E B ;NIV 

190 BEAD AI,B*,Cl:lF BOOM" THEN SOU» l.VALfl'tAt), >LV 
VAL(*fc*>B«),VAL(*t"*C«) ELSE 210 

200 GOTO 190 >TJ 

210 FOfi AM TO 1500:tHT:L0CATE 6,12;P»IBT* ":L0 >UV 

=5:B=24:A=32:J*NIV1;GÛSU1 890:L0=5:B=24:A=32: I-NIViOTS 
■ M 

220 [F HIV>1 THEN BESTOBE 960 ELSE IF MIV'2 THEN BESTOB >FZ 
E 1080 ELSE IF MIV=3 THEM BESTOBE 1200 ELSE IF BIV=4 TH 
EN BESTOBE 1320 ELSE IF HIV=5 THEM BESTOBE 1440 ELSE IF 
HIV=6 THEN BESTOBE 1S60 ELSE IF HIV=7 THEM BESTOBE 168 



230 IF NIV4 THEM BESTOBE 1800 ELSE IF MIV=9 THEM BE5T0 >BB 
BE 1020 ELSE IF HIV*10 THEN BESTOBE 2040 ELSE IF HIV=11 
THEM RESTOBE 2160 ELSE IF MIV-12 THEM BESTOBE 2280 
240 FOfi A=l TO 19:EC8(A,0) = l:EC»(A,ll) = l:ICn )K 

2S0 FOfi A=l TO iO:EOt(0,A>-l:ECI<19,A>=l:IEXT >HE 

260 '■■■■■DESSIN TABLEAU»»! >EJ 

270 FOfi B'1 TO 10:F0R A-l TO 18:BEAD ECB(A,B1:IF ECB(A, >KL 
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B)<>0 THEN £iSPBlTE,Ai4,BM6*24,SPB(ECfilA,B!> 

280 NETMtFJT >Mi 

290 BEAD NBH:F0B A=l T0 UNI: BEAD DMA) , YMiA) , SPH(A) ,TYP >ZF 

(At,D(AI:aSPBIT£,IJ1(AJi4,TH(AM16*2*,SPM'AJ:MEÏT 

300 BEAD BONUS: BEAD I,Y:I1=I:T1=T:READ NBC,lN:tNK 0, IH >BP 

310 ùSPRITE,IM,TU6t24,SPR!2t:D=2:Dl=D >JG 

320 'iitiiPBOG.PBIHClPALiiin >EF 

330 IF HKEY(GA)=0 THEN D1=D:I1=I:T1=Y:DIR£=1:YD=0:D=1 >PC 

iGOSUB 610 

340 IF IHKEY(D6>=0 THEN D1=D:I1=I:Y1=Y:DIRE=1:YD=0:D=2: >NP 

COSUB G10 

350 IF INKEY<FE)=0 THEH IF ÛBJ=0 THEN SAlTT=i:G05UB 750 >IA 

360 IF IMCET<FE)=Û THEN IF OBJ =2 THEN A=8:B=1:DUT 2SS.A >D1 

:OUT 256,B:E=ECi(Itl l T»n:Ea(I»l l ï*i)*û:4SMITE, (1*1)» 

4 1 <ÏMH16*24,SPBIE):F0B 1=10 TO 15:50UHD 1,0,20,7,0,0, 

B:HETT:OUT 2S6,2:G0SUB 900: OBJ =0 

370 IF INKEYIFErO THEN IF 0BJ=1 THEN LAS£R=1:DL*DIRE:I >W 

L=I'DIBE:YL ■ T:ùSPBI TE, XI.M.YLi 16*24, SPE(20I :GOSUH 900:0 

BJ=0 

360 IF INKET(HA)=0 THEN IF ECt(X,T>=10 THEN D1=D:I1=I:T >BV 

l=Y:DIBE=0:YD=l:D=3:G0$W 610 

390 IF IMKET(IA)=0 THEH IF ECRII.TMMO THEN D1=D:I1=I >TV 

:Y1=Y:DIRE=0:YD=1:D=3:GOSUB 610 

400 IF USER*! THEN IF ECB(IL*DL. YL>=0 Qfi ECH(IL»DL,YLJ >DG 

= 10 THEH ùSPB!TE,ILi4 1 ÏLil6*24,SPE(20):IL=ILtDL:ùSPBlTE 

,ILi4,n.il6*24,SFR(2O):S0UND 1,0,5,7,0,0,7 ELSE ÙSPBITE 

, ILI4, TLi 16»24, SPB< 20 1 : USEB=0 

410 IMIFPEMMItXYtl >QL 

420 IF l*="P- THEN BOBDEB 4:CALL IlBB06:BOBDEB >NH 

430 IF l*="S' THEN SPEËD 1 NK 7,7:BORDEK 15,24iB=24:U)=S >GF 

:|:--VIE:A-?2:G0SUB B90 : V t E - W I E 1 :B = 24:U>5; I - V 1 F : A Î2:CC 

SUS S90:S0UW 1, 1000,50,7:FOB A=l TO 300 :NHT: BOBDEB 0: 

IF VIEO THEN 3150 

440 '= DEP.ENEHI ==«======== )U 

450 FOK M TO RM >LG 

460 IF LASEJM THEN If ÏH(A)=ÏL THEN IF YH<A>=TL THEN D )0A 

(A>=0 

470 IF D1(AI=X THEN IF YHIA>=Y THEN H=A:SPE£D INK 7,7:B >FV 

OfiDEB 15,24: INK 0,24, 1S:B=24:L0=S: l=V]E:A=22:GOSUB 690: 

VIE=V1E-1:B=24:L0=5:I=VIE:A-22:G0SUB 690 : A =H: SOUND 1,10 

00,50,7:FDB 1 = 1 TO 300 :HEXT: BOBDEB 0:1* O.INHF VIE=0 

THEN 3150 

460 IF TTP<Al = l THEN GOSUB 800 >Ifl 

490 IF TYMI'2 THEN GOSUB 630 >N 

5U0 IF LASEE;] THEN IF miAi-Il. THEN IF YH<A)=YL THEN D >DV 

IA)=0 

510 If ÏM(A)=ï THEN IF YH(A)=T THEN N=A:SPE£D INK 7,7:1 >DE 

OBDEB 15,24:IHK 0,24,1S:B=2*:L0=5:I=¥IE:A=22:GDSUB 880: 

¥ I E-V LE l:B=24:Lfl 5:1 - V I E : A 22 : GOSUB 890: A=K:SOUKD 1,10 

00,50, 7:F0R 1*1 TO 300:HEXT:BOfiDEfl 0:1* 0,IH:1F VIE=0 

THEN 3150 EL5E 460 

520 HEIT >EC 

530 If SAUT--0 THEN GOTO 330 )UF 

540 '■ SAUT ::::==«=:===«= ÏBK 

550 IF 15=1 THEN Di=D:G0TO 580 >IH 

560 IF IS=2 THEN TD=-TD:G0T0 580 >ZT 

570 IF IS=4 THEN OIB£=0:YD=0:SAUT=0 )0T 

560 I1=I:Y1=T:C0SUB 610 >TH 

590 IS=IStl:GOTO 450 >PI 
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600 •= TEST COLLISIONS ===== >EC 

610 IF ECB(I*OIBE,ï«ÏD)=0 OR ECR(I*DIRE,Y»YD>=10 THEH I >GU 

=I»D1BE:Y=Y»TD:«IT0 700 

620 IF ECR(I*DIEF,Y*TD) 11 THEN L0=3:A=35:B=4: l=CLE;GOS >EA 

UB e90:CLE=aE+l:I=X*DiBE:ï=T+ÏD:ECB(I,ÏJ=0:ùSP81TE,Ii4 

,Yil6*24,SPR(ll):PBIHT CHJM(7);:L0=3:A=3S:B=4:l=CLÉ;GOS 

US 890:GOTO 700 

630 IF ECB<I*Dlfl£,YtYD)=l2 THEN IF CLDO THEN L0=3:A=35 )UE 

;B=4;I=CLE:G0SIJB 890 : C LE = C LE - 1 : 1 =1* D I BE : t ï * YD: ECB a , ï j 

=0:ùSPfilTE,Ii4,TH6*24,SPB<12):S0UHD 1,0,15,12,0,0,15:1 

0=3:A=35:B=4:1=CLE:GÛSU8 890:GÛTO 700 

640 IF ECBU*DIKE,YtYD)=15 THEN TAA=TAA»l:I=I*DIRE:ï=rt >VU 

YD:ECB(I,Y)=0:()SPBITE,Ii4,Yil6*24,SPB(15):L0=7:l=SC:A=2 

:B=24:G0SUB B90:SC=SC*100:A=2: l=SC:G0SU8 890:1F TAA=NBC 

THEN HlV=NIVtl:GOSUB 900:GOTO 150 ELSE GOTO 700 
650 IF ECB(I*DIR£,r*rD):U THEN IF OBJ'O THEN 08J=2:X=I >YE 
*D! EE: ¥ T*rD:ECB(Ï.Y) -0 : ÙSPBITE, H4, Y • 16*24, SPBl 14 l:H=l 
4:G0SUB 900:GOTO 700 

660 IF ECR(X*DIRE,Ï*YD)=13 THEN IF OBJ =0 THEN OBJ =1:1=1 >YB 
*DIEE:Y=YtYD:ECBLÏ i ri=0:ùSPBITE,Ii4.YH6t24 1 SPEll3):HM 
3:G0SUB 900:GOTO 700 

670 IF ECB(I*D[BE.Y*TDK13 THEN D=D1:RETURN >K 

680 IF ECB(HDIBI,YtTD)<15 THEN X=»DII1:T=T*TD:C0T0 70 >CT 


690 IF ECR(I'DIB£,Y+TD>=19 THEN I=I*DIEE:YY»YD:fcCfiiI, I JCL 
)=0:bSPBITE l Ii4,Ttl6«24,SPB<19):G0SUB 61O:G0TO 700 
700 ÙSPBITE, Ili4,(Yl*16H16t24,SPB(Dl]:ù5MITE,Ii4,Til6 )ÏL 
|24,SPBID):1F SAUT=l THEN BETURN 
710 '= CHUTE ======«======== )BJ 

720 IF EC8(X,M)=0 THEN Il=I:Yl=T:Dl=D:r=YM:CÛTO 700 )Z2 
730 IF ECBlI.YMKil THEN KETUBH ELSE M-fcljMlfl'TlDI >BN 
BE=0:YD=1:G0SUB 610 

740 RETUBN >ZG 

750 If INKETIGA)=0 THEN D1=D:DIRE=-1:DM:G0TO 760 >TJ 

760 If 1NKEY(DB)=0 THEN D1=D:DIBE=1:D=2:GOTO 780 >U 

770 DIEE--0:D1-D >FK 

760 IS=0:YD=1:BETUBN >RF 

790 '= DEP.ENEHIS (2) ====== >TG 

600 If ECfl(XH(A)+0(A',Yfl<A))=0 THEN iiSPBITE.MlAJH, YHl >ZC 

A)il6424,SFD(A):IH<A)=in(A)tD<A):ùSPBITE,XH{A)t4,YH(A)i 

16«24,SP11<A>:RETURN 

810 If ECfi<)J1(AHD<A>,YHU>»9 THEN ÙSPBITE, XII ( A H4,VHi >EC 

A)il6*24,SPR(A):IH(A)=IN(A)*D(A):ù5PBITE,DI(Ali4,YN{A]i 

16+24, SP«IAI:BETURN ELSE DIA)=-D<A) 

B20 BETURN >2F 

830 IF ECR(1H(A],YHIA1*D!A1)=0 THEN ÙSPBITE.ÏHIAIM. YHl >ZH 

A)il6t24,SPH<A):TH(A)=YH(A)*DIA):<kSPB(TE,IH(A)i4,YH<A)i 

16*24, SPH<A):RETUW 

840 IF ECB(0f{A),YH(A)tD(AJ)>9 THEN ÙSPBITE, IH<A)U, YHl >EH 

A)H6<24 r SPH(A):TH(A)=YH(A)tD(A):ùSPRITE,I)1(A)i4,TH(A>i 

16*24, SPH(AI:RETUtN ELSE D(A)=-D(A) 

850 RETUIN >ZJ 

860 '= AFFICHAGE =======«=== >TE 

B70 U=1:P0KE «902B,8:P0KE 19030, 2:CALL 19067:FOB l=A TO >BP 

A»LEN<AI)-1:IF (IlOKAt.V.DO* * THEN ÙSPR1TE, l*2,B, 15 
F40:bSPRITE,|i2,B,LE(A5C(NID«(AI,N,l))-64):U=UM ELSE U 
=B»1 

880 NEIT:POK£ tâ02B,16:P0KE tâ030,4:CAlX tâ067:RETURN >YT 
890 t»=STRI<l):AI=5TRINGt(LO-L£N(ni>il, l a )*BIGHTt(l1t,L >CE 




HMM>-l>:Vl:mE 14021. «:K»Œ U030,2:CAU U067:F01 
M TO «•LBIIAII l:OSMIH, !■!,«, I5f »0:tiS«ITÎ, ! •2.B.CH 
IHLIKIMI»,»,])!):» Utl:«En:P«E 16021, 16:NU UO30 
,A:CALL 19057:1171» 

HO IF OBJOO THH FWE ta02P,,15:ùSPllTE,6,l,SM<H>:PK >« 
E 16029, 16:IETI» ELSE EET1» 

110 |F BONUS I HEU SAIJT=1:IJXATE 5,5:PII»T STIlaElllO. >N 
l*3):^9:B-32;»t-"SAlTTVG0SUB 870:C0SU1 7H:9£Tln 
920 IF HMS'2 THE» lt=CA:CA^O«:«=«E:U)C«IE S.SiniHT >« 
STÏIK1I10,1U>:A=9:B=3?:A1 •CMUJCeS I ttOSOS' : C0SU1 
670:BETWI 

930 IF MUS. 3 HO UI>5:l'VIE!l'22:9>2A:C0SI»J 890:VIE. >BE 
VIEH:LO=5:l-VIE:A=22:B=24:COSUB 890:LOCATE S,S:PBI*T S 
1UNCII10,143>:ft=S:B*32:A|:-VlE STmBCÏTA I »E' : COSlffi 6 
70:1£TIH 

9U IF KMJSA THE» U>'7:I=SO:A*2:B>2A:«05UB 890:SC-SCi >VC 
2:L0°7:l=SC:t-2:t-2«:GaSIIB B90:L0C4TE S.S:P«IKT 51111» 
<10,U3I:1'9:9'32:»>-SCOIE DOUBLE' : E0SU1 B70:9ETni 
950 ■■ DATAS TABLE AUI '■■■■' >TE 

960 DATA 15,,,,,,,,,,,, >tl 

970 DATA ,,,,A,A,A,«,A,A,A,A,A,A,,,, )AU 

990 M» , ,,...15,,,.. >!» 

990 DATA A,A,<,l,10.A,A,A,A,A,A,A,A,IO,A,A,4,< MOI 

1000 DATA ,,,, 10 10,,,, >VC 

1010 DATA ,,,,10,,, ,15,15,, ,,10,,,, >2Q 

1020 DATA A, 10, A, A, »,<,», 4, A, A, A, A, A, A, A, A, 10.A >U 

1030 DATA ,10 10, MU 

10AO DATA 15,10 10,15 >DJ 

1050 DATA «,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 >JI 

1060 DATA 3,10,3,15600,1,1,10,6,15800,1, 1, 10,9,15800,1 >T1 

,1 

1070 04T1 0,12,9,6,14 Mi, 

1090 DATA 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 MOT 

1090 DATA ,5„, >TH 

1100 DATA ,, 12,, 5,,,, >Vt 

1110 DATA ,15,12,,, ,11,, ,,,,5 >IU 

1120 DATA 5,5,5,5,5,5,5,5,5,10,5,5,5,5,5,5,5,5 >IT 

1130 DATA 11,12 ,,10,,,,,,,, >IT 

1140 DATA 15,12, , 10,, , ,,,, 15, W 

1150 DATA 5,5,5,5,5,S,5,5,5,5,5,5,S,S,5,,, >G» 

1160 DATA 15,, 12, „ >« 

1170 DATA 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 XF 

1190 DATA 2, 10,4, 15000,1,1, 10, 7,15000,1, 1 >0t 

1190 DATA 0,12,9,4,5 >M 



1200 DATA 
1210 DATA 
1220 DATA 
1230 DATA 
1240 DATA 
1250 DATA 
1260 DATA 
1270 DATA 
1260 DATA 
1290 DATA 
1300 DATA 
1310 DATA 
1320 DATA 
1330 DATA 
1340 DATA 
1350 DATA 
1360 DATA 
1370 DATA 
1380 DATA 
1390 DATA 
1400 DATA 
1410 DATA 
1420 DATA 
,1 

1430 DATA 
1440 DATA 
1450 DATA 
1460 DATA 
1470 DATA 
1460 DATA 
1400 DATA 
1500 DATA 
1510 DATA 
1520 DATA 
1530 DATA 
1540 DATA 
1550 DATA 
1560 DATA 
1570 DATA 
1590 DATA 
1590 DATA 
1600 DATA 
1610 DATA 
1620 DATA 
1630 DATA 
1640 DATA 
1650 DATA 
1660 DATA 
1670 DATA 
1660 DATA 
1690 DATA 
1700 DATA 
1710 DATA 
1720 DATA 
1730 DATA 
1740 DATA 
1750 DATA 
1760 DATA 
1770 DATA 



,,12 

16,, 12 15,., 

6,6,6,6,6,6,6,6 t,„ 

15,12,,,,, ,,,,11 

6,6,6,6,6,6,6,6,6,6,10,6,6,6,6,6,6,6 

Il,, ,,10 12,19, 

10 12,15, 

,,,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 

, 11, ,,,12,15, 

6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6 

2, 10,4,I5C40,1, 1,10,7,65040,1,-1 

2,10,9,5,20 

7 19,,,, ,7 



>»T 

m 

>A1 



>KD 

>a 

MB 

>9C 
>« 

>tk 

>LC 



7 ,,7 7 

7,,, ,,,,1«,7,,, ,,,,,15,7 

7, 7, 7, 7, 10, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7 

15,12,, ,10 >H 

,12,, ,10 ,, ML 

7,7,7,7,7,10,7,7,7,7,7,7,7,7,7,7,7,7 Ml 

10 7,15,7,7 >TL 

,11,, ,,10 12,, 15,7 >AC 

7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7 >H 
3,15,3,15800, 1,1, 10,6. 16100,1, -1,10,9,16000,1 >TC 

3,10,9,4,11 >tt 

8,9,8,8,8,8,9,6,8,8,8,8,6,8,9,9,9,6 MO* 

, ,,,,,,12,15 MAI 

,,14,,14 12, >n 

6,6,8,6,8,6,8,8,8,8,8,6, 10,8,8,6,B,6 MJ 

,.,B,, ,,,,,,, 10,,,12,, >IA 

II,, ,6,, ,13 10,, ,12,, 15 >C0 

8,6,8,8,8,10,6,8,8,6,8,8,8,8,8,6,6,6 HI 

,11, ,8,, 10 12,, >rr 

15,15,12,, ,10,11 ,11, ,12, ,15 ICI 

8.6.8.6.6.6.6.8.6.8.8.6.6.8.8.8.8.8 MOT 
2, 15, 3, 15800,1,1,10, 6, 16040,1,-1 >M 
0,10,9,5,15 MU 

9,9,9,9,8,9,9,9,9,9,9 >CV 

,,,15,,, 9 14 >U 

,,,,,9 6,9 >l» 

,15, ,,9 ,,9,, 15 >TI 

,,,9,9,0,9,8,9,9,10,9,9,9,9,9,12,9 >J1 

,,9,9,,,,, ,,10 9,, >D1 

■>,9,, ,,,,,,10 9,, I» 

10 ,,10 9,, ME 

10,,, ,,,,,11,, 10,,,,, 9,15, >U 

9.9.9.9.9.9.9.9.9.9.9.9.9.9.9.9.9.9 Ml 
2,1,3,15000,2,1,3,2,15000,2,-1 >BI 
0,10.9,4.3 >« 
<. .«.,<, ,4, ,«, ,«,,».. 4,, 4, )AL 
A,A,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 t 4 >JC 
5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 MI 
,,,.5,, ,5,, ,5,,, 5,, ,5, >K 

11 5,,, 12, )» 

,10 ,,,12, ML 

,10 5,,. 12, ME 

,10„,5„ 15,5,, 15,5,, 15,5,, 15,5,15 )» 

5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 MO. 

A,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 >JI 



1780 Dm 2,S,5,l5BC0,2,l,U,S,tSBC0,2,l 

1780 DATA 0,1,8,5,1 

1600 DATA ,,.....,1*......... 

1B10 DATA 15,,,, ,,15,,,, 

1820 DATA ,,,11,,, 5,5, 5, 5, 5, S,,,,,, 

1830 DATA ,,,,,5,4,4,12,4,4,4,5 

1640 DATA ,,,,5,4 15 M 4,5 MI , 

1850 DATA ,,, 5,4,12,,,,,, 10,, 4,5,,, 

1860 DATA ,,5,4, ,12,,,, 15,, 10 >t , 4, 5, 11, 

1870 DATA 14,5, 4, ,15, 12,, ,,,,10, ,,,4,5, 

1880 DATA 5,5, 5, S, 5, 5, 5, 5, 5, S, 5, 5,5,5,5,5, 5, 5 

1890 DATA 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 

1900 DATA 2, 3,3,»5C40,1, 1,6,7,15040,2,-1 

1910 DATA 0,2,7,5,1 

1920 DATA ,7,15,,,10,„,,„10„„7, 

1930 DATA ,7,, ,,10 10,,, ,7, 

1940 DATA ,7, 8,8,8,10,,,,, ,,10,8, 8,6,7, 
1950 DATA ,7,, ,,10,, ,,15,, ,10,, ,,7, 
1960 DATA ,7, ,,,10,6,6,6, 6,6,6,10, ,,,7, 

1970 DATA ,7,, 15,, 10, 10,, 15,, 7, 

i960 DATA 8,7, 8, 6,8, 10,, ,,,,,10, 8,8,8,7,8 

1990 DATA ,7,, ,,10,, ,,15,, ,10,, ,,7, 

2000 DATA 8,8,8,8,8,6,8,8,8,8,8,8,8,8,6,8,6,8 

2010 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 

2020 DATA 2,9,4, IÛC0û,l,-l,9,6,iSC00,l,l 

2030 DATA 0,9,8,5,11 

2040 DATA ,,,,14, ,,14,,,,,,,,,, 

2050 DATA ,19 ,,,,, 

2060 DATA 8,8,8,8,10,8,8,8,8,8,8,6,6,8,8,8,8,8 
2070 DATA 15,, 7, , 10, ,,,,,,,,,,7,15, 

2080 DATA fi, 8,8,, 10 ,,,,,,8,8,8 

2090 DATA ,, ,,10,,,,,15 ,,, 

2100 DATA ,„,10, ,,,14,, 

2110 DATA ,,,,10,, 12, 12, 12,12,,,,,, 8,8,6 

2120 DATA ,14,, ,10,, 12,15,, 12,,, ,,,12,11,11 

2130 DATA 6,8,8,8,8, 8,8, 8,8,6,8,6,8,8,8, 8,8,6 

2140 DATA 1, 9,7,45040,1,-1 

2150 DATA 4,3,9,4,11 

2160 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,6,9,9 

2170 DATA 11,,,,,,,,,,,,,,,,, 

2180 DATA 7,,,, 15, ,,,,,, 15,,,,,, 7 

2190 DATA 7,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,10,7 

2200 DATA 7,,,,,,, ,,,,10,7 

2210 DATA 7, ,,,,,,8,8,8,8,8 10,7 

2220 DATA 7,,,,,,, 15„10,7 

2230 DATA 7,5,5,5,5,5,5, , ,,,,5,5,5,5,5,7 

2240 DATA 15,12,, ,15,,, ,,,,,7 

2250 DATA 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 

2260 DATA 3, 6,2,15600,2, 1,13,2,15000,2,1, 10,9,fc5C40,i 



2270 DATA 0,3,8,5 

2280 DATA 11 

2290 DATA 8.6,8,10. 
2300 DATA ,,,10,,,, 
2310 DATA ,14,, 10, 
2320 DATA 8,10,8,8, 
2330 DATA ,10,,,, 8 
2340 DATA ,10,, 14, 
2350 DATA 10.9,9,3 
42 



........10,, 

8,8,, ,,,,,,,, 10,, 

,, ,10, .1S 

8,6, 8,8, 8, ,8, 8, 8,8, 10,8,8 
6,8,9,8,8,8, ,,,,,10,12,15 
9, 15, 9,8,, ,,,,10, 8, 8 
8,8, 8,8, 8,,, ,,,10,, 



.9,,, 10, 15, 



2360 DATA 10,,, 13,, , ,14, ,,,8,8,8,8,8,8,8 >EF 

2370 DATA 8,8,6,8,6,8,8,8,6,8,8,9,9,9,9,9,9,8 >U 

2380 DATA 2,6,3,15880,1,1,10,8,1.5680,1,-1 >FC 

2390 DATA 1,3,9,4,15 >M 

2400 'iiitiiPBESOfTATlOMiiiiii >U 

2410 POKE 19028, 15:PQKE k9030,40:HODE 0:PAPEB 0:CLS:BOB >GU 
DES Û:ÙSPBITE, 20,150, 15F40:FQ» A=150 TO 8 STEP 8:uSPEI 
TE,20,A-8,t5F40:ùSPBITE,20,A,fc5F40:NEIT:UlH><N 10,1,20, 
5,2S:PAPES S:CLS:P0KE fc902B,16:POKE i9030, 4:CALL 19067 
>DN 2420 FOB A=8 TO 76 STEP 6:ùSPBITE,A,64,i5900:ùSPBITE,A, )AP 

>w Bo.isaco^pBiTE.A-A.ao.iaeco^EiT 

2430 BE5T0BE 2460 >LÏ 

2440 AM5:B=100:AI=M OÏSTICKVGOSUB d10;t-l2i:kt=*ti ET >CH 

B0ABD":G0SUB 6/0:A=S:8 = 18O:Ar g EC8IT PAB STEPHANE DE CA 

NEVAVGOSUB B70:A=S:B=188:AI= , C0PTBIGHT DEÇA SOFTU 

ABEVGOSUB 870:L0=4: 1=1989:A=I5:B=188:G0SUB 890 

2450 l*=UPFE»CIIKETt> >BJ 

2460 BEAO At,BI.CI:IF CIO'1 1 THFJ) SOUND 1. YALCVtA») >CB 

,VAL(*l.*iBt),VAl( a L**Ct) EISE BESTOBE 2460 

2470 IF ll='K' THEN tU=û:6A=2:GA=8:DB=l:FE=9:BETUBII EL5 >UA 

E IF l»= m J" THEN HA=72:BA=73:GA=74:D»=75:FE=76:B£TUBH E 

LSE 2450 

2480 DATA 3F4,A,5,777,A,5,3F4,A,5 ÏLt 

2490 DATA 777,A,5,3F4,A,5,777,A,5 >ZT 

2500 DATA 3F4,A,5,777,A,5,3F4,A,5 

2510 DATA 777,A,S,6A6,A,5,5EC,A,5 

2520 DATA 597,A,5,4FB,A,5,470,A,5 

2530 DATA 3F4,A,5,777,A,5,6A6,A,5 

2540 DATA 5EC,A,5,597,A,5,4FB,A,5 

2550 DATA 470,A,5,3F4,A, S, 777,4,5 

2560 DATA 6A6,A,5,5EC,A,5,597,A,5 

2570 DATA 4FB,A,5,470,A,5,3F4,A,5 

2580 DATA 777,A,5 t 6A6.A,5,5EC,A,5 

2590 DATA 597. A. 5, 4F», A, 5. 470, A, 5 

2600 DATA 3F4,A,5,777,A,S,6A6,A,5 

2610 DATA 5EC,A,5,597,A,5,4FB.A,5 

2620 DATA 470,A,5,3F4,A,5,777,A,5 

2630 DATA 6A6.A,5,3B».19.S. IDD.50,5 

2640 DATA FD,50,5,1DD,14,5,FD,14,5 

2650 DATA 13E.28.5, 17B.28.5, 1DD, 14,5 

2660 DATA 17B,U,5,1DD,50,5,13E,50,5 

2670 DATA EE,F,5,D4,F,5,»D,F,5 

2680 DATA 7E,F,5,6E,F,5,EE,lE t 5 

2690 DATA 8E,1E,5,7E,28,5,77,F,5 

2700 DATA 6A,F,5,5E,F,5,3F,F,5 

2710 DATA 47,F,5,77,1E,5,47,1E,5 

2720 DATA 3F,28,5,3B,F,5,35,F,5 

2730 DATA 2F,F,5,1F,F,5,23,F,5 

2740 DATA 3B,1E,5,23, 1E,5,1F,28,5 

27S0 DATA 5EC,32,S,l,3.0,5EC,32,5 
>LD 2760 DATA 1,3,0,5EC,32,5,EE,19,5 

>UL 2770 DATA 3BB,50,5,1FA,50,5,3BB,14,5 

)AQ | 2760 DATA 1FA,14,5,27D,28,5,2F6,28,5 
)U 2790 DATA 3BB, 14,5, 2F6.14, 5, 388,50,5 

>JQ 2800 DATA 27D,50,5,1DD,19,5, 77,50, 5 

>JG ' 2B10 DATA 6A,50,5,77,50,5,6A,50,5 
)K I 2820 DATA 5E,50,5,59,50,5,5E,50,5 
>CK 2630 DATA 59,50,5, 4F.50.5, 47,50,5 

>DA I 2840 DATA 4F,50,S,47,50,5,3F,50,5 )K 



>11 

m 
m 
>u 
>zl 

)U 

m 
>zl 
m 
m 
m 
>u 

>ZG 
>BB 
>AÏ 
ÏU 
>BJ 
>IG 
>TE 

>n 

>n 



m 

m 
m 

>CF 
)IF 

m 

>M 

m 



2B50 DATA 
2B60 DATA 
2670 DATA 
2880 DATA 
2890 DATA 
2S00 DATA 
2910 DATA 
2920 DATA 
2930 DATA 
2840 DATA 
2950 DATA 
2960 DATA 
2970 DATA 
2960 DATA 
2990 DATA 
3000 DATA 
3010 DATA 
3020 DATA 
3030 DATA 
3040 DATA 
3050 DATA 
3060 DATA 
3070 DATA 
3060 DATA 
3090 DATA 
3100 DATA 



1,3,0. 77,50, 5. 3F, 50,5 

77,14,5, 3F, 14,5, 4F, 28, 5 

5E. 28,5, 77.14, 5,56,14,5 

77,5O,5,4F,S0,S,77,19,S 

ID0,F,5,U9,F,5,1DD,F,5 

1A9,F,5,FD,F,S,FD,F,5 

1DD,F,5,1A9,F,S,17B.F,5 

165,F,5,13E,F,5,11C,F,S 

FD,F.5.13E,F,5.16S,F.S 

17B,F,5,1A9,F.5,1DD,F,5 

D4,F,5,B2,F,5,M,F,S 

8F,F,5,B2,F,S,B2,F,S 

58, F, 5, 4F, F, 5, 5E, F, 5 

6A,F,5 ( 3F,F,5,5a,F,5 

59,F I S,11,F,3 I 8E0 I 3C 1 3 

1,3,1,0,0,00,0,0 

FD,50,S,1DO,U,5,FD,14,5 

13E,28,S,178,28.5.1DD,14,5 

17B, 14,5,100,50,5, 13E, 50,5 

EE,F,5,D4,F,5,BD,F,5 

7E,F,5,8E,F,S,EE,IE,5 

6E,1E,5,7E,28,5,77.F,S 

GA,F,5,5E,F,5,3F,F,5 

47,F.5,77,1E.5,47,1E,5 

3F,28,5,3B,F,5,35,F,5 



>ZL 
>TH 



<Ah 

>BL 
>BB 



3110 DATA 2F,F,5,1F,F,5,23,F,5 W 

3120 DATA 3B,lE,5 > 23,lE,b,lF r 2fi,& >ZT 

3130 DATA SEC, 32.5, 1,3,0,5EC,32,S >ZP 

3140 DATA 1,0,0,0,0.00,0,0 >TJ 

3150 SOUK) 1,1000,S0,12:PAPFJ S:aS:AM5:B=80:AI=*CAHE >FT 
0VEB':COSUB 670:FÛR M TO 1000:HEIT:BUH 



2 »■ LISTING 2 ■ 

3 '« CBAPHI5HE5 

10 DEB=l6800:L0HG^999:N0m='IOIISTAIl.BIH a :LI6=10O 

20 FOfi A=15800 TO 16800*1999 STEP 16:SOI=0:F0t 6=0 TO 15: 

AI:POKE A*B,tfALffc"«A*):SflM^SO« + VALCfc"»A»i:Mt:ïT:[.IG---LIG 

IHT I.IG:EEAD A*: IF S0HOVALCl'*AI) THEH Pfi I HT*EBiEUB EN 

-;L1C:FJU> ELSE XFJT 

30 SAVE NOn*,B,DEB,lilNG:END 

100 DATA FO, F0,FO,A0. M. 96,30, FO^O, 06.30,70, £4,30. '0,70 

110 DATA 5O,F0,»0, 70,50,96,30, 70,00,F0,F0,A0,50,D8,D8,D8, 

120 DATA 50,5B,D8,D6,50,S6,58,DB,50,5B,FO,58,50,FO,70,FO. 

130 DATA 50.BC, B4, 78,50, FC.3C, 78,50, FO,B4,78,FO,FO,FO,F0, 

140 DATA 50,F0,FO,F0 l F0,3O.64 1 A0 l BO,3O,E4,A0,BO,BO,3O,D6 

150 DATA 8O,7O,FO,AO,BO,3O,64,A0,50,F0,FO,0O,E4,E4,E4,AÛ, 
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160 DATA E4, 
170 DATA B4, 
160 DATA 50, 
190 DATA F0. 
200 DATA Et, 
210 DATA B*, 
220 DATA FO, 
2» DATA FO,: 
240 DATA FO, 
250 DATA FO, 
260 DATA 50 
270 DATA B*. 
2» DATA B«. 
290 DATA B4, 
300 DATA CC, 
310 DATA F3, 
320 DATA SB. 
330 DATA 00, 
340 DATA 03, 
350 DATA 83, 
360 DATA 63, 
370 DATA 83, 
360 DATA OC. 
300 DATA 4C, 
400 DATA OC, 
410 DATA CC, 
420 DATA CO, 
430 DATA CO, 
440 DATA CO, 
450 DATA CO, 
460 DATA 10, 
470 DATA 60, 
480 DATA 10, 
490 DATA 60, 
500 DATA 00, 
510 DATA 60, 
520 DATA 00, 
S30 DATA 00, 
540 DATA C3. 
550 DATA SC, 
560 DATA BC. 
570 DATA 8C, 
580 DATA 50, 
5» DATA 50, 
600 DATA 54. 
610 DATA 54, 
620 DATA 00. 
630 DATA 00, 
640 DATA FC, 
650 DATA FC, 
660 DATA 00, 
670 DATA A4, 
680 DATA A4 
690 DATA A4, 
700 DATA 00 
710 DATA D2, 
720 DATA 83 
730 DATA 00, 
740 DATA 00. 
44 



FQ,F0,FO,FO,FO, 



,FO,Ft 



FO, FO.FO, 29, D2, 
F0,F0,A0,B4,3C 

16,3C,K8,B4,3C. 



3C,BC,F6,B4,7C. 



l6,7C,Fa,B3,3C, 



16,7C,F8,83,3C, 
OC, OC, OC, 56. 58. 
BC, OC, OC, OC, 58, 
,S8,0C, OC, FO.OC 



CO.CO.CO.CO.CO 

co,co,co,co,co, 



C0.C0,C0,C0,C4 



80,10.80.10.80. 
C0,C0,C0,10,B0, 
80,10,60,10,80, 

CD, CO, 00,10,80. 
60, CO, DO, 10,60. 
00,00,60,60,00, 



10,80,00,00,60 



0C,A4,0C,8C,0C 



A4, A4, A4, K, A4 
00,00,00,54,40. 
40,00,00,54,40, 
FO, 00, 00,54,40, 

FO,F0,A0,SO,F4 



00,40,00,00,00, 
FO.FO.FO.FC.FO, 
FO.FO.FO.FC.FO, 
FO.FO, 00,50, OC. 
98, 64, 56, A4, 96, 
,08.04,58,44,08, 
C9, 06,58, A4, 4C. 



B4,3C,FO,S0,F0 



FO,FO,00,00,96 



A4,AO l A4,FO,A4,A0,FO,BO,F0,AO,OB£0 750 DATA El.D2,B,D3,E,0,C3,C3,A2,0Û,Fl,F3,00,00.A5,bB,Û0,06CB 

FC,A0 t l4,7e,F0,A0,FO,FÛ,FO,FO,0BSO 760 DATA 50,0F,OF,A2,A5,OF,0F,5B,A5,A5,5B,5B,A5,A5,5B,58,062E 

FO.FO.FO.FO.FO.FO.FO.FO.FO.FO.OEIO 770 DATA 50,0F, OF, 42,50, SA, A7,A2,5O,5A,A7,A2,F0,Fl,F3,F3,06BD 

F0,F0,50,F0,F0,A0,E4,CC,CC,D6,0DA4 7B0 DATA 80, 00, 00,40, 04, 00,00,08, 00, OC.OC, 00, O4.CO,CO,OB.027O 

,58,58.F0,CC t 6C,FO,FO,FO,FO,FO,OC2B 790 DATA 58,DO,DO,B4,5e,F0,F0,A4,58,FO,F0,44,4e,EO,EO,44,0AE0 

3C,F6,l4,F8,B4 t FB,FO,F0,F0,F0,0ClC 600 DATA 04,00, CO, 08, 08, X,X, 04, 08.00,00,04, 06, 08. 04,04. OiW 

29,D2,BC, 30, 3C,52.FC,3C,3C, 78.0845 810 DATA OC, 00, 00, OC, OB, 04, 06.04, 06. 04, 08, 04, X. OC, OC, OC, 0078 

30, 30, 30, 52,80,30, 30, 78,FC,3C, 0845 B20 DATA FO,FO,FO,FO,D2,FO.FO,FO,C3,FO.F0,F0.C3,FF,FF.FO,OEA6 

,29,D2,BC,3C,3C,52,FC,3C,3C,76.08A5 8» DATA C3,AE,FF,FO,C3,FF,5D,F0,C3,FT,5D,F0,C3,FF,5D,FO,0C8D 

3C,3C,3C,S2,BC,3C,3C,7B,FC,3C,08A5 640 DATA C3,AE,FF,F0,C3,AE,FF,F0.C3.FF,FF,F0.C3,AE,FF,F0,0DD1 

,3C,78,I4,96,3C,FB,B4,16,7C,F8,0930 850 DATA C3,FF,FF,FO,C3,C3,C3,F0,C3,C3,C3,D2,C3,C3,C3,C3,0l>ll 

.7C I FB,B4,3C,3C,F8 I B4,3C,7C,F8,06EA 860 DATA F0,F0,Al,FO l 52 > 52,78,7B,78,7B,7B,7B,F8.F8,F4,F0,OAB9 

,7C,FB.B4.3C,X,F8.B4.3C,7C,FB,091Q 6/0 DATA FO,FO,Al,FO t 03,FO,B4,FO,B4,FO,B4,FO,F4,FO,FC,F8,OD28 

,7C,F6,B4,FC,FC,FB,50,F0,F0,40,0BBC 660 DATA F0,F0,Al,F0,52.$2.F0.78,B4,FO,76.F0,F8,F0.FC,F8.0C6S 

,U,30,F0,F0,F0,F0,F3,F1,F0,F1,0C45 890 DATA FO l FO,Al,FO,S2,52,FO,7B,B4,FO,F0,78,FB,F8,F4,FO,0CSD 

,F3,F3,F3,F3,F3,F3,F3,5I,F3,F3,0ES7 SX» DATA FO. FO. 52. FO. 52, FO, 73. FO. 78. 7B.3C, 78, FO.FO. PO. Fa.0640 

,A7,F3,05,51,A2,5B,OS,51,A2,05,071E 910 DATA FO,F0,03,52,52, F0,78,FÛ,X,FQ,F0,/8,FQ, F8,FC,F0,ÛI4Ï 

A2,00,00,00,OA,00 I 00,00,OA,00,0167 920 DATA F0,F0,A1,52,52,F0. ?6.F0,X.FO. 78. 78,F8.F8,FC.F0.Q675 

FC,F0,83,16,7C,FB,83,3C,FC,F0,0970 930 DATA F0,F0,O3,52 > F0,52,FO,78,B4,FO,B4,F0,F4,FO,F4,FO,0BEF 

FC,F0,63,16 t 7C,F8,83,3C,FC,F0,0970 940 DATA FO,F0,Al,F0,52,52.78,78,B4.F0.76.7B.F8,F6,F4,F0.OB6D 

FC,FO,83,16,7C,Fe,B3,3C,FC,FO,O970 950 DATA FO,F0,Al,FO,S2,52,78,78,B4,78,FÛ,78,F8,F8,F4,F0.0l6D 

FC,FO,B3,16,7C,FB,83,3C,FC,FO,0970 960 DATA FO,F0,Al,FO,S2.S2 t 78.7B,B4,7B,FO,78,F8,FB,F4,FO,0K0 

F0,A4,OC,CC,8C,0C ( 58,F0,A4,FO,06CO 970 DATA FO,FO,E0,FO,D0,M, 70, 70,30,70,70, 70,DB,DB,D6,DB, 0110 

FO,0C l 0C,E4,BC,A4,FO,0C,A4,OC,061C 960 DAT4 FO,F0,CO,F0,D0.D0.7O.7O.30,FO,7O,7O,D8,D8.CC,F0,0J7C 

FO t 0C,0C t A4,BC,58.0C,56.F0,A4,060O 990 DATA FO,F0,EO,FO,D0,DO,7O,F0,70,F0,70,F0,D8,De,E4,F0,0CF4 

CC,eC,0C,OC,FO,A4,0C,OC,OC,OC,05AÛ 1000 DATA FO. FO.CO.FO. DO, 00. 70, 70,70,70, 70.70, D8. 06, CCF0.OB3C 

CO,CO,CO,CO,C0.60.CO,C8,CO,CO.OfiA8 1010 DATA FO,F0.CO,DO,DO,F0, 7O,FO,3O,FO,7O,F0,De,F0,CC,De,0C7C 

C0,C0,CO,C0,6O,C4,C0,C0,CO,C0,01A4 1020 DATA 00,00,00,00,00,00,00,00,00,00.00,00,00,00,00,00,0000 

,CO,CO,9O,CO,C0,CO,CO,CO,C0,CO,OBD4 1030 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,0000 

CO, CÛ,C4,C0. CO.CO.CO.CO.CO, 00. 0BD4 1040 DATA FO,F0,CO,M,[)O,FO. 70,F0,3O,F0. 7O,F0,D6.F0,D8,FQ,XA0 

10,80,10,80,10,80,10,60.10,80,0480 1050 DATA FO,FO,EO,DO,DO,FO,70,FO,70,70,70,70,D6,DB,E4,FO,OiF* 

10,60,10,80,10,80,10,80,10,80,0600 1060 DATA FO,FO,D0,DO,DO,DO.7O,7O,3O.7O,7O,70,D6.De,D8,D8,0AEO 

10,60,10,60,10.80.10,60.10.80.0480 1070 DATA FO,F0,C0,DÛ,EO,F0,BO,FÛ,BO,F0,B0,FO.E4,F0,CC,&8.ÛO98 

,10,80,10,80,10,80,10,80,10,80,0600 1060 DATA FO.FO.FO.DO.FO.DO.FO, 70, FO. 70, FO. 70,06. D8.E4.F0, 0004 

,10,80,60,00,00,60,60,00.00,60,0300 1090 DATA FO,FO,DO,DO,DO,DO,70,70,30,FO, 70, 70, 06, 06,08,06.0660 

00,80, 10, 80, 10, 80, 00, 60. CO, 00, 03CO 1100 DATA FO.FO. DO.FO, DO, FO. 70. FO. 70. FO. ?O,F0,D8,F0,CC,D8,QCEC 

,80,00,00,10,80,00,00,10,60,00,0240 1110 DATA FÛ,EO, Dû, DO, DO, DO, 30, 70, 70, 70, 70, 70,06. D6,D6,D6,0A£0 

,80,00,00. 10,60,00, 10, CO, 80,00,0350 1120 DATA FO.FO, DO. DO. CO, DO. 70. 70, 70, 70. 70, 70, D6.D6, 06. 08,0610 

C3,C3,C3,8C,0C,C3,C6,00,A4,49,09F5 1130 D4TA FO,F0,E0,F0,D0,D0,7O,7û,7O,70,70,7O,D6,D8 t E4,FO,M74 

A4,OC,8C,A4,A4,A4,aC,A4,A4,OC,06Ea 1140 DATA FO,FO,CO,FO,DO,DO,7O,7O,3O,FO,7O,FO,D6.FO,D6,F0,OC20 

I A4,A4,eC,K,A4,44,8C.A4,A4,A4,0S48 1150 DATA FO, F0,E0,FO, DO. DO, 70,70, 70, 70,70, 70.08, Dfl,E4,CC,OB50 

,0C,A*,8C.A4.A4,A4,C3,C3.C3,C3,09DC 1160 DATA FO, FO.CO.FO, DO, DO. ?0, 70.30. FO, 70.70. Dfl,DB.D8.D6,0B70 

00,00,54,AO,00,00,54,AO,00,00,032C 1170 DATA FO,F0,CO,DO,DO,FO, 70.F0.30, 70, FO, 70,Fû,D6,CC,De,OBFC 

,0Û,00,54 t 4O,O0,00,S4,A0,00,O0,03CC 1180 DATA F0,F0,C0.DO,E0,F0.BO.F0.B0,F0.BO,F0.E4,F0,E4,F0,OOC8 

<,AO,OO,54,F0,A0,A0,54,F0,F0,A0,0e30 1190 DATA FO,F0,DO,0O,W,DO, 70,70,70,70,70, 70, D6,D6, 00, D8, 0814 

F8,AO,00,FC,FC,AO,W,00,FC,00,0944 1200 DATA FO. FO, DO, DO. DO, DO. 70.70,70,70, 70. 70, M, 06, E4.F0, 0644 

.00,00,40,50,00,00.00.80,40,00,0270 1210 DATA F0,F0,D0,DD,DO,DO,70,7O,7O,7O,3O,7O,D6,D6,D6,De,OAE0 

AO,OQ,00,FC,F8,00,S4,F8,F0,A0.0610 1220 D4TA FO.FO.DO.ÛO.DO.DO. 70. 70, BO.FO, 70,70. D6,D6. 06,06. 06£0 

FO,FO,FC,F0,F0,F0,FC,F0,F0.FO,0F3O 1230 DATA FO,FO,DO,DO,D0,D0,7O,70,B0,F0,B0,F0,E4,F0,E4,F0,0Œ8 

F0,F0,S4,FB,F0,A0,0O,FC,FB,O0,0C68 1240 DATA F0,F0,C0,DO,F0,D0,FO,70,BO,F0,70,F0,D8.F0,CC,D6,0CFC 

,OC,AO,A4,4C,BC,58,A4.96,64,58,0684 12S0 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,0000 

64,58.44, C8,64,56,A4,C8,C4,58, 0640 1260 DATA FO.FO. FO.FÛ.FO.FO, FO,F0,F0,EO. FO.FÛ.FO, FO.FO. FO.Of 00 

,C4, 58,44,09,04.58,44,09.06,58,0424 1270 DATA FO,FO,FO,FO,FO,F0,F0,FO,FO,FO,FO,FO,F0,FO,FO,FO,0FOO 

80,56, 5O,OC,OC,AO,O0,FO,FO,OO,0747 1280 DATA FO,FO,F0,FO,F0 t F0,F0,F0,E0,90,F0,C0,E0,9O,3O,7O.0C6O 

7C,A0,83.3C,3C,F6. 63, X, 3C.F6. 0667 1290 DATA E0,9O,F0,CO,3O,3O,7O,CO,30,30,3O,7O,EO,9O, 30,64. 07B4 

.78,AO,83,3C,3C,F6,83,3C,I4,F8,09GB 1300 DATA FO.CQ, 70. FO. 30,06. CO.CO.CO.CO, CO.CO.CO.CO.CO, 00, 06A6 

.14^6,41,16,70,40,00,86,78,00,0793 1310 DATA EO, 30, FO, 90, £0,30, 30, 30, EO, 30, £0,90, 30, 30, FO, 90. 0860 

, 78,00, 00, 96, 78, M, 00, 41, 40,00,0400 1320 DATA 30,30,30,D6,CO,30,30,30,D8,90,70,F0.30,De,CO,CO,0606 

,C3,A2,E1,D2,E1,D3,C3,02,E1,C3,04FB 1330 DATA CO, 60, CO, CO.CO.CO.CO, DO, EO,X,BO, 30, BO, 30,80, 30, 0960 



1340 DATA BO, 30, B0,30,F0.F0.F0, 30,30,30,64, 08,30.64. B0.30.07DO 1600 DATA D8.30, 70. F0.30, 70, CO.C0,C0,CO,C0.C0.C0,CO,C0, 00,0*98 

13S0 DATA De,BÛ,3O,BO,64,F0,CO,6O,C0,30,C0,60,60,CO,C0,00,O99C 1610 DATA FO,F0,F0,FO,F0,F0,FO,FO,F0,FO,F0,FO,FO,FO,FO,F0,0F00 

1360 DATA B0,30.BO,70,B0,30.F0,3O,B0.30,BO,3O,F0,F0,FO,F0,0980 1620 DATA F0,F0,F0,FO,F0,F0,FO,F0,F0,F0,FO,F0,F0,F0,F0,F0,OFOO 

1370 DATA B0,3O,FO,FÛ,3O,t»,FO,3O,D8.B0.30,BO,64,FÛ,CO,C0.QA24 1630 DATA FO,F0,F0,FO,F0,F0,FO,F0,0O,00, 00,00,00,00,00,00,0780 

1380 DATA C0.60. 60,60, 6O,C0,C0,D0,B0,3O, 30, 7O,BO.3O,FO,3O,O610 

1390 DATA B0,30,BO,3O,F0,F0,FO,F0,80,30,FO,F0,3O.De,FO,3O,OA68 

1400 DATA D8,FO,30,30,08,FO,CO,CÛ,C0.30,CO,9Û,60,CO,CÛ,DO,OA60 

1410 DATA BO,3O,30,F0,B0,3O,BO,30,B0,64,BO,3O,70,F0,F0,FQ,0eF* 

1420 DATA B0,3O,F0,FO,3O,DB,F0, 30,08, FO, 30,30, D6, FO,C0,CO,OA5B t . :::::=r:::::::r=z::z; 

1430 DATA CO,C0,C0.C0,60,C0.C0,DO,B0,3O,3O,F0.B0,3O,3O,3O,OeF0 2 '= LISTING 3 

1440 DATA B0,64,F0,3O,3O,64.F0,FO,B0,3O,FO,F0, 30, 30,30,30,0628 3 •= ASSEKBLEUB 

14S0 DATA De,FÛ,B0.6*,FÛ,FD,C0.C0.C0.CQ,C0,30,C0,CO,C0,DO,OBBC 5 • ;; ; : . =,^= ====== 

1460 DATA B0,3O,D8,F0,B0,30.3O,7O,BO,64,F0,F0,BO,3O,D8,FO,O9C4 10 DEB=l9023:LOHG=l71:H0M="KElSTA12.Bllf:LIGM00 

1470 DATA BO,64,F0,F0,30,30,3O,3O,D8,F0,B0,6*,F0,FQ,C4,CB,OGFC 20 FOB A=19023 TO 19023* t M STtP 16:S0n=0:F0B B=0 TU 15:READ A 

1480 DATA C4,CC,C0,C8,CO,C8,CO.D0,B0.30,64,F0.B0,30,D8,F0,0BOC | : poKE AtB,ÏALCf»All rSOMH*ULt*ft**M) :NEXT;LIG=LlGtLO:PBI 

1490 DATA B0.64, FO,FO,FO,3O,D6,F0, 80,64, FO,F0,3Û,»,FO,30,0AF8 KT LIG:B£AD A«:1F SQNOVALCI.'tAI) TOI PIIKT'EMEUB EU LIGUE' 

1500 DATA D6,F0,30,30,70,F0,C4,C4,C4,C0,C4,C4,C4,C4,C0,DO.OB34 ;LIG:EHD ELSE NETT 

1510 DATA BO,3O,64,F0,B0,30,64,FO,B0,64,FO,F0,F0,3O,De,FO,OA44 30 SAVE NOM, B, DES, LONG :EW 

1520 DATA B0,64,FO,FO,3O,W.FQ,3O.D6.BO,3O,B0,3O.F0,C4,C4,0A2C (00 DATA 00, 11, 00, 70,21, 00, C0.06. 60. C5,E5, 01,28.00. 1A.AE.0463 

1530 DATA C4,CB,C4,CO,C4,CC,C0,D0,B0,3O,30,Da,B0 l 3O,64 ( F0,0A4C no DATA 77,23, 13, 10,F9,E1,CD,26,BC,C1,10,ED,C9,00,21,FF,07ED 

1540 DATA BO,64,FQ.F0,F0.3O.D6,F0,80,64,FO,F0.3O,D6,F0,3O,0AFB 120 DATA B7, 16, 00,DD,5E,04,18,DD,46,02,C5,11, 00,06, 19.D2.05i3 

ISSU DATA D8,B0,3O,BO,3O,F0,C4,C4,C4,CO,C4,C4,C4,C4,C0,D0.0e34 130 DATA 59,90,01,50,CO,09,C1,10,F1,22,60,90,C9,00,00,00,Û5AO 

1S60 DATA BO,G4,B0,64, 80,30, 30, D8,80,64.FO,30,30,30,D6,FO,06ËC 140 DATA 00, 00. 00.00, 01. 71, 90,21, 63, 90, CD. D1.BC.C9, 76. 90. 063f 

1570 DATA BO,64,F0,F0,30,D6,FO p 3O,D6,3O,7O,F0,30,70,C4,CB,O9B0 , iso DATA C3, 7E, 90,53, 50,52, 49,54, CS, 00,00, CD, 41, 90,2A,60, 0650 

1580 DATA C4,CC,CO,C6,C4,C4,CO.DO.B0,64,BO,64,B0.64.B0,64,0A80 160 DATA 90, 22, 28.90, DO, 6E,00,DD, 66, 01, 22,25. 90.CD.23, 90.0650 

1590 DATA BO,64,B0,3O,3O,64,FO,F0,B0,64,FO,F0,30,De,FO,30,0984 | 170 DATA C9, 00,00,00,00, 00,00,00, 00, 00,00, 00, 00,00,00,00, OOCS 




FAITES 
LE BON CHOIX ! 



INFORMATIQUE 

COMMUNICATION 

DIALOGUE 3615 MHZ 



• Vous trouverez les rubriques suivantes : Toutes nos revues, Questions-réponses, 
Petites annonces. Boîte aux lettres. Revendeurs, Nos produits, Horoscope. 

TELECHARGEMENT 361 5 ARCADES 

• Que vous soyez possesseur d'un PC ou d'un CPC, nous vous proposons plusieurs 
centaines de programmes. 

Au téléphone. 15 mn coûtent en moyenne 55 F 
Par minitel. « vous en coûte pour le même temps 1 5 F 



AMSTRAD 464-6 128 



-10°/o 



SU r tous les log*** 
en septembre 



fJif^ROMftNIftJ 



rtk PISTOUET 1 
MAGNUM 
349 f 

POUR CPC «6« 

ET 612» 

AVEC 6 iEUX 



DE COMBAT 
Ot CHlZOCtAH! 

US JUSTICES 14SM«'| 
+ DRA«>N NIN1A 

I + RAMBO 3 

-r/ U ro"ô«'-Nr 

génial nobotop 
NOUVEAU 

SOCCERSQUAD 99 11 



STARWARSTBILOGV 129 199F 



DE G 



LES 



NTIC 



sSrtous 
IIocicieis 




COMPILATIONS (suite) 

1 LA COMPIL OCEAN 149/199F 
♦L'ARCHE DU CAPITA. BLt 
♦DALEY THOMPSONS 
I OLYMPIDUE.CHALLENGE. 
■THE VINDICATOR 
S A LA MANDER 
TYPHOON 
ITHEST0RYS0FAR2 129/1 



i-HOPl'INMAD 



LE MONDE DE L'ARCADE 149199F 



♦IMPOSSIBLE MISSION 2 

+ SPY HUNTER+BLACKBEARD 

ti'oi.ossi.l M 

MEGAPACK 149 199F 

* RALLY 2.BILLY 2 

+ MACH 3+FOOT+ BILLY 

+TEEN]S+.'iE AXE 

DIX SUR DIX U9199F 

.\1IK<I-NARY 
♦HARDBALL 
♦ARMAGUEIXtN MAN 

♦LEVIATHAN 

.BOBSI IICH 

• SH\l kl ! Il 
♦TRANTQR+CHOLO 

fXBNOt-IOTH l-'RAME 

GEANTS DE L'ARCADE 2 149/199F 



Kl I 



NDO 



+ S1DK ARMS 

♦GUNSMOKE 

+DESOLATOR 

♦SHACKLED 

12 JEUX EXCEPTIONNELS 129 149F 

>( -i BERNOID 

♦DER.EKTOR 

+ MASK + B[.(X>l)HROIHEKS 

♦NEBl 1 US+HERC! LES 

+NORTH5TAK + E\Ol.i IN 
-IIS MAITRES DE L'UNIVERS 
♦VENOM 5TRIKES BACK 
+MARAUDKR+RANARAMA 



OUVERT DE S 

COMPILATIONS (suite) 

OCEAN DYNAMITE 149 199F 

+ PLATOON 
+PREDATOR 
♦KARNOV 
+CRAZY CARS 
♦COMBAT SCHOOL 
♦GRY/.OR 

+SALAMANDER+DRILLER 
+ROLLING THUNDER 

BESTDEUSGOLD 149/199F 

+OUT RliN 
+GAUNTLET 2 
.CALIFORNIA GAMES+720" 
LES DEFIS DE TAITO U9/199F 

■ I \kl.l I Kf.NIliADI 
+ARKANOID 1 
.AKKANOID 2 

+HUBBLE BOBBLE 

♦ ELY1NG SHARK+SI.APF1GHT 
GAMESETHATCH2 149/199F 
+MATCHDAY2 
+BASKETMASTER 

♦SUPER HANCiON 
.CHAMPION CHIP SPRINT 
♦TRACK AND FIELD 
+CR1CKET+SNOOKER+GOLF 
GOLD SILVER BRONZE 149 199F 
23 EPREUVES SPORTIVES EPYX 
HISTORY IN MAKING 199 249F 
+1.F.ARDERBOARD 
♦EXPRESS RA1DER 

.IMPOSSIBLE MISSION 

■ S! i'I-KCYCLE+GAUNTLET 
.iJl-.ACH HEAD+INJII IRAÏOK 
+KUNG FU MASTER 

+SPY HUNTER+ROAL) RUNNER 

-mil CEI EE+OOONIES 

+WORL GAMES* R-XID 

-m ai il iii-.AD 

FORCES MAGIQUES 149/199F 

♦ L'ANTHERE ROSE 
♦WESTERN GAMES 
+CI.EVER AND SMART 
+OPERAT NEMO+DAKAR 4X4 
SPACEACE 129/149F 
•CYBERNOID.NORTHSTAR 
+/YNAPS+TRANTOR 

■I AOL ON+XEVIOI s 

Al M)\| STKIKLS BACK 



COMPILATIONS (suite) 



TEN MEGA GAMES 3 129 149F 

.LL.ADt-.RBOARD 

. inmi R \Mi;-L.AS7MISSION 

.ELRELORD+ROCCO 

♦R A N AR A MA+EIGHTERPI LOT 

.IMPOSSIB1.E+C1TY SL1CKER 

+DRAOON TALK 

FISTANDTHROTTLES 119/139F 

♦ENDURO RACER 

♦BUQGY HOY 

+IKARI WARRIOR 

.DR.U.ONS LAIR 

+THUNDERCATS 

KARATE ACE 11S/175F 

+KUNG FTJ MASTER 

-.BRUCE LEE 

♦Ut'Hl MATA JUDO 

♦A VENGER 

♦THE WAYOFTHETH3ER 

+SAMOURAI TRILOGY 

♦THE WAY OF BXPLOCHNC IIST 

ARCADEACTK* 115/185F 

.BARBAR1AN 

+RENEGADE 

♦SI.PERSPRINTVRAMPAGE 

. INTERNATIONAL KARATE 2 

COLLECT. KONAW 115/185F 

-.JACKAL+SHAOLINROAD 

+NEME51S+JAILBREAK 

.YEARKUNGFU2+M1KIE 

+GREEN BERET 

+ YEAR KUN. FU 

.H YPERSPORT-.P1 NGPONG 

GAME SET MATCH 129/179F 

< Il SMS-IIYI'EKSPORT.l'1M;H>\t; 

+KJOT+ GOLF+BASEBALL 

• H( )\IN< i-ITXH.+Sl !P DECATHLON 

SPECIAL ACTION 99 149F 

.GRY/.OR+TARGhT RENECADE 
♦INTERNATIONAL KARATE-. 

.SA! AMANDER 

♦ BASKET MASTER+SHAOLIN R 



r 



3615MICROM A NIA 
C'EST GEANT l 
Des promotion' 
flash loo» !•» : 



NE CHERCHEZ PLUS A PARIS ! 

Les Nouveautés sont d'abord 
dans les boutiques MICROMANIA ! 



FORUM DES HALLES 
5, rue Pirouetle 
Niveau - 2 

Métro et RER Les Halles 
Tél. 45.08.15.78 



PRINTEMPS HAUSSMAN 
64, bd Haussman 
Espace Loisirs sous-sol 
75008 Paris 
Métro Havre-Caumortin 
Tél. 42.82.58.36 



:RCIAL GALAXIE_____J| 

I a*pu v eA«0 



CENTRE COMMERCIAL GALAXIE 

PRINTEMPS ITALIE 

30, avenue d Italie 

Niveau 1 Rayon Musique-Micro 

75013 PARIS 

Métro Place d'Italie 

Tél. 45.81.11.50. Poste 4141 



AMSTRAD 464-6 128 



L'été continue chez MICROMANIA [jff V| " l 5[l 

- 10% (MICROMANIA 



sur tous les logiciels 
en septembre 

— NOUVEAUTÉS'J- 

A NE PAS MANQUER 



™^$^2b£lM& M 



A.P.B. 99/I49F 

BATMAN (LE FILM) 99/I49F 
BLOODWYCH 99/I49F 

t AKKll K (OMMAND I45/I95F 
KNK.HI FORCE 139/ 179F 

Nl-W /FAI ANDSTORY 99/14-JF 
'Hl AN ISl Mil VnLI.FVWU'Il 
PAMC STATIONS 99/I49F 

KAINHOW ISLAM) W/MW 

SKAII-: OK 1)11 'I5/145F 



r AUTRES NOUVEAUTES' "^ 


ACTION l M.il l l K 


1 05. 155F 


BOMBl /AL 


99/ 149F 


CABAL 


99/ 149F 


DOMINATOR 


1WI-WF 


DOi BLE DRAGON 


99/ 149F 


DRAGON SHIH1T 


99/M9F 


in\\\iiiK m \ 


WI49F 


GEMINI WINt; 


99/ 149F 


HIGH STEEL 


99 149F 


KULT 


14WIWF 


MELKIRL AVFN1SE 


145/1451- 


MR IN 1 1 


W/I49F 


PASSING SHOT 


99I49K 


P47 


99/ 149F 


PROJECT STF.ALTH F 


143/1991 


STAR TRKK 


y S/1 45F 


STEJGAR 


99/I44F 


SUPER WOMIf.RBIH 


H/IW 


T1NTIN SUR LA LUNE 


143 19» 


WLIKDDREAMS 


149/ 199F 


XENAPHOBE 


I09/I69F 







AFTER BURNER 


99/1 49F 


EtARHARIAN 2 


H9/I39F 


CRA/.Y CARS 2 


t29/M0P 


DOUBLE DETENTE 


44/1 49F 


POR0OTTBN WORLDS 99/I49F 


OARYL. HOTSHOT 


95/1 35F 


INDIANA JONES: 


99/1 49F 


IMF LASTCRL'SADF 


ARCADE] 


MICROI'ROSF SOCC 


KW/K.5F 


RINFGADE 1 


99/1 49F 


RICK DAN0SROUS 


99/1 49F 


SILKWORM 


W/144F 


STORMLOR» 


99/1 49F 


SUPER SCRAM8BLE 


4U 1 l'Jf 


<,\\1l S SI \l\tl R 1.1)11 40/I49F 


ugii \nm 


99/ 149F 



145/1 95F 

145/ 195F 
99/ 149F 
95/ 145F 
4V/I44I- 
95/1 39F 

I95/245F 
99/ 149F 
95/ 199F 

145/ 195F 



r SUPER PROMÛT 


ON^ 


MANETTES ET CABLES 




MANETTE US GOLD 


109f 


i PtetwKHMRdtinltCRATI tTEl 


Manette SPEED KING 


109F 


PHO5000 


129F 


CHEETAH MACH! 


129f 


CHEETAH 125* 


8SF 


CORDON pouf 




toancbemen! de 




deux maneties 


49F 


CaUe Magnéto AMST 


49F 


CaWe (Textension 




poui Joysw* 
CaWede 


49F 


TELECHARGEMENT 


49F 


HOUSSE DE PROTECTION 


Housse CPC 464 COUL. 


89F 


Housse CPC 464 MONO 


B9F 


Housse CPC 6128 COUL 


89F 


Housse CPC 612B MONO 


89F 


DISQUETTES VIERGES 




4 Cassettes Vierges 


29F 


4 Disquettes Vieiges 


99F 


10 Disquettes Vierges 


195F 



3 D POOL 

BUMPY 

CHICAGO 9ii 

Ht KMliR HILL 

(TtlCK VI AGIR AIT 

DRAGON NINJA 

FOOTBALL MANAG : 

CUNSHIP 

H. AXE. 

UFRUFSOF LANCE 

HIGHWAY PATROL 

II. MANOIR DE MORT. ND/199F 

OPERATION WOLP 99/I49F 

l'IRMLSDF II F.R 99/I44F 

Cl RPLB SAT. DAY I49/209F 

REAL GHOSTBtLSTERS 94/I44F 

RTYPE 95/I4SF 

RI NNING MAN 95/I45F 

RUN THE C.AUNTT.ET 44/I49F 

SCRAHIil 1 Dl I I M 

SKWI BK 

MM I \S! MM \ : 
Mil Mit KBIKDS 
M\1I SCASM-R 

VB4DICATORS 

WECI E MANS 
X Y BOTS 



SOLDES DISQUETTES 
49 F 



nd/::m 

145/195! 
125/1 45F 
125/1 45F 
99/ 149F 
99/1 49F 
99/ 1 «F 
99/ 149F 



SOLDES CASSETTES 
39 F 



BUB ITH ftCTHM 

(1ALVAN RKVOUMON 

"' Mltll.HI MIMklIIl 

IMniSSIHII MISSION ? nu (iH-J. 

I I DfTORM tlll M1IH 

iH*:iM><H-f.».t- /dkhcj 



SONTD'ABO RD 



UlHOVSgBjSS^ 1 



.. Cas logiciels doivent 

sortit prochoinement. 

Téléphonez au 

93 42 57 12 

pour connaître 

la disponibilité exacte 

dej^acyueJocnne|_ 

Votre jeu chei mus dent 48 h' en téléphonant su 93.42.57.1]. / NOUVEAU 



SUPER GENIAL!! 

LES EXCLUSIFS 
MICROMANIA 

Chaque fuis que vous 
commandez au Club vous 
[«(.aviez 2 points pool un 
logiciel en cassette ei 3 
pour un logiciel en 
disquette (sauf bien sui 
pour les soldes et les 
classiques) Quand vous 



,yftis 



poiri 



souhaite qui vous 
seia liviê ovc votre 
piochuine luminunde Avec 
6 points vous pouvez 
choisu I des 2 T-Shirt 
Micromanla (High Score 
ou Ploy Ayoïii) Avec 
20 points, vous ouiez la 
Super Montre du Club, 
et bientôt, plein d'auties 
articles fantastiques 



1 I^TTlNTION^epu^lParti^ompour le 16.93.42 J7J 1) _ 



BON de COMMANDE EXPRESS à envoyer à MICROMANIA • B.P. 3 • 06740 CHATEAUNEUF 

TITRES PRIX 



^^^r 



Bien sûr comme en BASIC, cette 
routine est à placer avant l'affichage 
de votre mot. 

• OBCOEH : choix du mode écran Le 
registre A est chargé avec le numé- 
ro du mode. 

• 0BC32H : choix des couleurs de 
chaque encre 

A : numéro de l'encre (0 à 15) 

B : numéro de la première couleur 

(0à26) 

C : numéro de la seconde couleur 

<0à26) 

. 0BC38H : choix des couleurs du 
BORDER 

B : numéro de la première couleur 
(0à26) 

C : numéro de la seconde couleur 
(0â2ô) 

Remarque : pour ces deux routines. 
pour éviter le clignotement des cou- 
leurs, on chargera B et C â la môme 
valeur. 



• 0BB90H : choix delà couleur d'écri- 
ture (PEN) 

A : numéro de l'encre <0 à 15) 

• 0BB96H : choix de la couleur de 
fond (PAPER) 

A : numéro de l'encre (0 à 15) 

Voilà de quoi bien vous amuser. 
SI Jusqu'Ici vous avez tout compris, vous 
ne devriez pas avoir trop de problème 
pour utiliser ces routines. Mais atten- 
tion, nous n'allons pas donner un cata- 
logue des routines système. «Clefs pour 
AMSTRAD» le fait très bien... 

Bien sûr le mode d'adressage Im- 
médiat que nous venons de voir s'ap- 
plique aussi pour les registres doubles, 
à la différence que cette fois II est 
possible d'entrer des valeurs supérieu- 
res à 255. ce qui est utile par exem- 
ple dans le cas de coordonnées gra- 
phiques : 

• routine OBBEAH : affichage d'un 
point en coordonnées absolues 



DE : coordonnée en X 
HL : coordonnée en Y 

• OBBEDH : affichage d'un point en 
coordonnées relatives 

• 0BBF6H : traçage d'une ligne en 
coordonnées absolues 

• 0BBF9H : traçage d'une ligne en 
coordonnées relatives 

Môme syntaxe que ci-dessus. Les 
lignes sont tracées depuis l'ancienne 
position du curseur graphique. 

Bon pour vous aider. Je vous pro- 
pose de saisir le listing commenté qui 
suit. Ce sera tout pour ce premier ar- 
ticle. Avouez que la difficulté n'est pas 
énorme pour le moment. Il faut dire 
que nous avons vu peu de choses, très 
peu de choses. L'article du mois pro- 
chain, bien qu'assez bref, traitera de 
points très Importants pour la suite Ne 
vous découragez cependant pas. ce 
n'est qu'à partir du troisième article 
que vous sere2 réellement emballé. 
Je ne vous en dis pas plus. Il n'y au- 
rait plus de surprise. A bientôt I 



PARTICIPEZ A AMSTAR & CPC 



LE PROGRAMMEUR 



Nom 

Adresse complète 



Age- 



Jolndre un relevé d'identité bancaire pour paiement 
de vos piges. 



Attestation sur l'honneur 
Je soussigné 



déclare être l'auteur du programme ci-joint et ne 
l'avoir jamais proposé à une autre revue. 



LE PROGRAMME 
Nom 



Catégorie □ Jeu □ Utilitaire □Educatif 
Taille 



Périphériques utilisés 

Support G Cassette 

Comptabilité (testée) avec : 

□ 464 Q 664 □ 6128 

□ PC1512 Q PCW8512 

Signature 



□ Disquette 
□ PCW8256 



' .. t *"n> ' , .. ' n i .. » An « "n. -d' li 



DUCHET COMPUTERS 

51, Saint-George Road CHEPSTOW - NP6 5LA 
ANGLETERRE - Tél. + 44 291 625 780 






/ 



LE HACKER («mon professionnelle) pour CPC 464/664/6128 

Encore une interface miracle de DUCHET Computers ! 

La version 4.0 du HACKER a ëlè acclamée par la presse informatique des deux cotes de la Manche ' Consulte; les 

bancs d'essai élogieux des magazines français AMSTAR-CPC ei AMSTRAD CENT POUR CENT ! 

Maintenant la version 7.0 professionnelle en FRANÇAIS est disponible I 

Pour ceux qui n'ont pas eu l'occasion de lire les fantastiques bancs d'essai, décrivons rapidement le HACKER : 

Le HACKER est une interface qui se branche en 2 secondes à l'arrière d'unCPC.EIIe est dotée d'un interrupteur de validation/invalidation ainsi que d'un bouton 

"magique". En appuyant sur te bouton, vous interrompez les programmes à tout moment Plusieurs dizaines de commandes sont alors a votre disposition pour 

"manipuler" le programme interrompu ! 

Vous travaillez directement en mémoire où vous examinez, modifiez, desassemblez, éditez, copiez, découpez, imprimez les programmes ' 

Le loader d'un programme vous intrigue ' Appuyez sur le bouton durant le chargement et inspectez-le ' 

Vous trichez dans les jeux ? flaputez des vies, modifiez la table des scores avec les PEEK et POKE du HACKER ! 

Un logiciel hors de prix et plombé à mort n'est pas assez performant selon votre goût ? Un coup de HACKER et vous lui donnez la performance désirée ! 

Etes-vous un programmeur sérieux ? La version professionnelle 7.0 du HACKER comprend un ASSEMBLEUR intégré ! 

L'assembleur de la version 7.0 permet d'assembler directement et immédiatement en mémoire ! Toute erreur est immédiatement détectée ! 

Tous les codes standard ZILOG 280 sont supportés 

L'interface "Le HACKER" version 7.0 est le résultat de deux ans de travail et recherches paf un team de super programmeurs franco-britanniques. 

Le système opérationnel du HACKER est en français et réside entièrement à l'intérieur de l'interface. Le HACKER comprend aussi un pon d'extension pour relier 

d'autres périphériques 

Un large manuel détaillé et explicatif en français accompagne le HACKER 7.0. 

Il est évident que pour utiliser correctement le HACKER, il laut posséder certaines connaissances informatiques et savoir différencier un 280 d'un camembert ! 

Dans le cas d'un CPC 6126. spécifiez si le bus d'extension de l'ordinateur est mâle ou lemelle SVP 

L'interface "LE HACKER" 

professionnel 7.0 ne vaut que 



495,00 FF 



(Pour expédition hors Europe ajouter 30 FF SVP) 




FAITES CROIRE A VOTRE CPC 464 
QU'IL EST UN CPC 6128 ! 

'Vous possédez un CPC 464 avec lecteur DDit et rêvez d'un CPC 6128 Ptus la peine de teter le 464 dans la poubelle 
du voism et de dépenser une fortune ! H vous suffit de vous procurer la CARTE FO.DOS 
Encore une interface miracle de DUCHET Computers ! 
La Carie FO.DOS se branche en deux secondes à l'arriére du CPC 464 ' 
Aucune soudure ni connaissance en quoi que ce soit ne sont requises ! 

Vous pressez un interrupteur et votre CPC 464 fonctionne en mode 6128 avec toutes les commandes du 6128 à votre dispo- 
sition Finie la hantise d'avoir à définir les variables ... Finies les frustrations des programmes qui ne "tournent" qu'avec 
les CPC 6128 ! Si vous avez certains programmes qui ne fonctionnent qu'avec un CPC 464. pas de problème, poussez 
l'interrupteur dans l'autre sens, et vous retournez en mode 464 ! 

La Carte FO.DOS offre tous les avantages des 464 et 6128 sans aucun de leurs inconvénients ! 
Pour les programmes énormes et gourmands en mémoire, raputez une extension mémoire DK TRONICS de 64K ou 256K 
et le bon vieux CPC 464 deviendra une machine professionnelle avec 128K ou même 320K de mémoire ! 
La Carte FO-OOS comporte un port d'extension pour relier d'autres périphériques 
La carte FO-DOS est accompagnée d'une notice explicative en français. 



La CARTE FO.DOS ne vaut Q , e 



420,00 FF 



port compris 
(Pour expédition hors Europe ajouter 30 FF SVP) 



Le Hacker FO.DOS sont en stock et disponibles EXCLUSIVEMENT en vente par correspondance 

chez DUCHET COMPUTERS. Ils ne sont pas en vente dans les magasins. 

Envoyez vite votre commande (en français) a : 

DUCHET COMPUTERS 

SI, Saint-George Road CHEPSTOW - NP6 SLA 

ANGLETERRE - Tél. International + 44 ■ 291 625 780 

ENVOI IMMEDIAT LE JOUR MEME PAR AVION dans le monde entier 

REGLEMENT A L'ORDRE DE "DUCHET COMPUTERS" par : • Mandat Posie International en Francs • Chèque personnel français bancaire ou CCP La Posle 

en Francs • EUROCHEQUE personnel en livres sterling (vous laites la conversion) • CHEQUE BANCAIRE en livres sterling compensât* en Angleterre établi 

par votre banque • Carte de crédit internationale VISA, EUROCARD, MASTERCARD. ACCESS (indiquez n» de carte et date de validité, mais n'envoyez pas la cane). 



■ m 



Si vous êtes pressé, passez votre commande par téléphone .EN PARLANT EN FRANÇAIS ! 

Téléphonez à Caroline, Jean-Pierre ou Didier au (indicatif international) + 44 291 625 780 de 8 h a 19 ri 

Nous acceptons les commandes par téléphone avec cartes de crédit. 




DUCHET COMPUTERS 

51, Saint-George Road CHEPSTOW - NP6 5LA 
ANGLETERRE - Tel + 44 291 625 780 

EN EXCLUSIVITE : 

MATERIEL ET LOGICIELS EN FRANÇAIS POUR 
AMSTRAD/SCHNEIDER 464/664/6128 A DES PRIX 
PLANCHER 1 

PUBLICATION ASSISTEE PAR ORDINATEUR POUR CPC 612S 

(Les CPC 464+DD1/664 nécessitent une extension mémoire DK Tronics 64K) 

OXFORD P.A.O. 

^Un FANTASTIQUE progiciel en FRANÇAIS pour créer faci'emeni vos mises en page. 

^ La disquette 3" comprend 350 Koctets de programmes, tichiers, projets, icônes, motifs, figures géométriques, bordures, 
28 fontes de caractères, etc. aisément redéfinissables. 

Créez facilement vos documents, fonles, dessins, icônes, etc. 

Intégrez texte, vos copies d'écran personnelles, etc. à vos documents. 

Edition, copie et mouvement de blocs de travail entiers. 
Edition et création de caractères, motifs, dessins, etc. à un demi pixel près. 
Zoom, effets miroir, vidéo inversé, "tête en bas", etc. 
Compatible avec SOURIS Siren (et AMX). manettes ou clavier et avec imprimantes matricielles AMSTRAD (sauf DMP1), EPSON et compatibles, 
et de type IBM 

Copies imprimées multiples, échelle à 100 %, à 50 %, à 25 %. 

Nombreuses possibilités, de l'impression légère rapide à l'impression de précision "une aiguille" en très haute résolution 
Entièrement en français. Manuel complet très détaillé en français. Enfantin à utiliser 
OXFORD P.A.O. sur disquette 3" pour CPC 6128 4EA AA CE 

(ou 464 + DD1/664 avec 12BK) ne vaut que .., &9UjUU ft port compris 




• j (Pour expédition hors Europe ajouter 10 FF SVP.) 




BIG rLASHcR Plus de 200 Koctets de RSX et progiciels utilitaires en français, extrêmement simples a utiliser ' 

Plus de 130 options d'exploration, édition, recherche, création, manipulation, information, compactage, formatage, archivage, copie, gestion d'impn- 

manle, création de poslers de 8 pages, programmation de touches, calculions, copies d'écrans, double PEEK, double POKE. tri de données, 

traceur, gestion de couleurs, input, call, analyses, etc 

Toutes les RSX peuvent être incorporées dans des programmes personnels La plupart des options comportent un envoi facultatif sur imprimante 

Compatible clavier, manette et souris AMX. 

Enorme manuel en français, bourré d'exemples. ... a a ■■ 

BIG FLASHER (DISC 3 ") en français pour CPC 464/664/6126 ne vaut que ZUUjUU FF port compris 

(Envoi avion hors Europe + 20 FF SVP) 

TRANSFERTS CASSETTE - DISQUETTE 

NEMESIS EXPRESS 2 Le progiciel de transfert universel 
Heureux propriétaire d'un lecteur de disquettes, avez-vous un ou deux problèmes à trouver un logiciel de transfert extraordinaire pour archiver 
votre collection de cassettes sur des disquettes ? 

Ne vous tapez plus la tète contre les murs ! D'abord ça lait mai, et puis ça peut réveiller les voisins !.. Procurez-vous NEMESIS EXPRESS 2... 
NEMESIS EXPRESS 2 comprend 109 programmes utilitaires sur les deux faces d'une disquette ! 

NEMESIS EXPRESS 2 possède un "renifleur" automatique qui vous indiquera la meilleure laçon de transférer vos cassettes. 
NEMESIS EXPRESS 2 est le plus puissant logiciel de transfen K7/DISC en Grande-Bretagne 
NEMESIS EXPRESS 2 est universel. Il transfère les cassettes nouvelles, récentes ou même anciennes ! 
NEMESIS EXPRESS 2 pour 464/664/6128 est disponible en version française. Il est accompagné d'un manuel complet et extrêmement détaillé 

NEMESIS EXPRESS 2 (Disc 3") en français ne vaut que ZwUjUU FF port compri» 

(Envoi avion hors Europe + 10 FF SVP) 

Rajoutez 30 FF et nous joindrons les détails de transfert de 1100 (mille cent !) cassettes avec NEMESIS EXPRESS 2. 

Les produits ci-dessus sont en stock et disponibles EXCLUSIVEMENT en vente par correspondance 

chez DUCHET COMPUïERS Ils ne sont pas en vente dans les magasins 

Envoyez vite votre commande (en français) à : 

DUCHET COMPUTERS 

51, Saint-George Road CHEPSTOW - NP6 5LA 
ANGLETERRE - Tél. + 44 ■ 291 625 780 
ENVOI IMMEDIAT LE JOUR MEME PAR AVION dans le monde entier 
REGLEMENT A L'ORDRE DE "DUCHET COMPUTERS" par : • Mandat Poste International en Francs • Chèque personnel français bancaire 
ou CCP en Francs • EUROCHEQUE personnel en livres sterling (vous faites la conversion) • CHEQUE BANCAIRE en livres sterling «impensa- 
ble en Angleterre établi par votre banque • Carte de cré dit intern ationale V ISA. EUROCARD, MASTERCARD, ACCESS (indiquez n° de carte 
et date de validité, mais n'envoyez pas votre carte) MÊp\\ P«on 

Si vous êtes pressé, passez votre commande paTîeléphone EN PARLANT EN FRANÇAIS ! 
Téléphonez à Caroline, Jean-Pierre ou Didier au (indicatif international) + 44 291 625 780 de 8 h à 19 h 
Nous acceptons les commandes par téléphone avec cartes de crédit. 



ASTUCES 





S1LKWORM 



Ce programme 
s'adresse â ceux 
qui possèdent te Jeu sur disquette el 
vous donne des vies Infinies : 

10 'VIES 1*1 NI ES POU SILKWfifl DIS >Ut 

BUETTE 

20 IODE l:PtlKT*miBfTEZ...' >ZU 

30 ADR=U29B:F0B A =90 T0 300 STEP 1 >FV 

fcM 

40 FOB 1=0 T0 20: BEAU «îC^ALCV» >HU 

M>:D=D4C:P0KE B'ADS,C:«Tr 

50 KAO M: IF DOVALCt"»!*) THE* P >U 

ilHT -EMa* EN LIGNE \A:E» 

60 AM--AMt21;HXT HBX 

70 PBIirr:PBIIIT 'IHSEKZ L'UIGIIIAL XX 

DE S1LKMWI ET TAPEZ UNE TOUCHE... ■ 

00 CALL UB00:CALL Att06:CALL U298 >K 

00 DATA 0É,FF,21,C0,A2,OI,16,BD,Af, >TH 

47.48,CS,FS,CO,32,BC,F1,C1,3C,FE,10 

,IDF 

100 DATA 20,F4,OI,7A,A4,AF,CD,0E,K >IW 

, F3, 01, TF.FA.ED, 49,06, 08, 21, 00,80,2 

B.9C2 

110 DATA 70,14, 20,F1,10,F5,3E,02, 21 >TH 

,4b,40.CD.OA,A3,3E,03,21,00,CO,CD,0 

A.7U 



120 DATA A3.AF, 21,00,00, 22,61,40,32 >ZH 

68.40,01. 7E, FA. ED, 49, C3.FE, 98,4F, D 
D.96A 

130 DATA 21, 60, A4, D0. 7E, 00,89,28,0* )1t 
,00,23,00, 23,D0,23,DD, 23, 18, F0,D0,5 
6,913 

140 DATA 01, DO, SE. 02, D0, 46, 03. 3t. 18 >TI 
,93, 18, 38,07, 79,80, 30, *F,C3,4E,A3,0 
E.78E 

ISO DATA 16,CS,F5,ES,DS,C9.tE,A3,Dl m 
.E1,F1,C1,5F,7B,93,*7,7C.83,67,1E,0 
i,IE4 

160 DATA 14,18,DA,3E,4C,32,49,A4,3E >TQ 
,06,32,4E,A4 t 79,lD,93,32,F6,A3,7l,3 
2,718 

170 DATA E1,A3,1E,23,4B,C3,G8,A3,S9 >TC 
, 74,32,42, A4, 32.49, A4, 22,97, A3. 71,3 
2,8F* 

180 DATA 40,44,79.32, 4F, A4, 11, 45.A4 >TC 
,CD,Bl,A3,3A,64,A*.B7,20,F4,li.3F,A 
4,9*8 

190 DATA CD, 98. A3, 11, 4S, A4, CD, 81, A3 >Tfl 
,11,48,44,21.00.0), 18, 1E, CD, AC, A3, 1 
1,967 

200 DATA 43. 44, CD, 81, A3, 21. 64, A4. C8 >TU 
,6E,28,F3,C9,01,39,A4,18,09,01,21,A 
4,915 

210 DATA 21, 64, A4, 18. 03. 01, EA, «3, ED >TC 
, 43, E3, A3, 14,47, C5, 13, 1A, 01, TE, FI, F 
5.94A 

220 DATA ED,78,87.30,ra,FA,C9,A3,Fl >BC 
, OC, ED, 79,06,08, 10, FE.C1 . 10. E6,01, 7 
E,932 

230 DATA F8,ll,0O t OO,C3,EA,A3,OC,ED >ZE 
,7B,OD,18,ED.7B,F2.EA,A3,7A.93.C2,E 
5.BA0 

240 DATA A3, 11. 00,00, OC.ED, 78, 77,00 >TU 
,23,lB,7A,B3,CA,»,A4,ED,78,F2 t 03,A 
4,894 

250 DATA E6,20,C2.F7,A3,C3,IE,A4,0C )ZH 
,ED,78,00,FJ),78,F2,1*,A4,Ë6,20,C2 1 1 
0.94C 

260 DATA A4,21,64,A4,ED,78,FE,C0,38 >7J 
,FA.0C,ED, 78, 77, 00, 23, 3E, 05, 30,20, F 
D.907 

270 DATA ED,78,E£,10,2Q,Efl,C9,ED,78 >n 
, F2, 39, A4 , CS, 03, OF, 00, 00, 01 , 08, 02, 4 
A, 891 

280 DATA 00,09,00.00,00,00,00,00,00 >» 
, 2A, FF, 00, 00, 09, 13, 06, Of, 01, 03, 01,1 
8,196 

290 DATA 14, 00, 06. 10. OC, 14, 00, A4, 00 >VI 
,00,00,00,00,00,00,00,00,01,06,01,4 
0,138 

300 DATA 02,07, 11, 60,03, 01,11, 40, ES >TN 
.C5.CD. 38, K,D1,DF,83,M,C9,63,C7,0 
7,915 

73 



60 DATA 21.rT.Al,ll,40,ûû,CD,CB,IC, )VI 

Oh, 07, CD. 01-, m. C5, CD. 00, 89, 11.00,06 



STORMLORD 



Après avoir chargé 
et tance ce pro- 
gramme av&c le Stormlord en dis- 
quette, vous aurez droit à des vies in- 
finies, au passage à travers les enne- 
mis et a une rallonge de temps : 

10 'IHHOBTALITE, INVIPCIBI1.IT>:, BAL >LA 

LONGE DE TOfS POUB STOBUJttD DISQU 

ETTE 

20 M A=0 Tu 174:B£AD A»:B=VALC." >LX 

•AtkPOKE **IA500,B:C CB:NEIT 

30 IF CO1BS04 THE* PB1HT 'EBSEUBS >DV 

DANS LES DATAS. ..':EH) 

40 HODE 2:PBIMT 'IHSEBE2 L'OBICIUL >NI 

DE STQBHLOBD ET APPUYEZ SUE UNE TO 
UCHE...' 
50 CALL UBO0:CALL UB06:CALL U574 >MJ 



70 DATA 63,C7,01,rE,FB,3£,4C,C0,5C, >IB 

CS,3E.0O,CD l SC,C9,3E,Oe,CD,SC,C9,3E 

,00 

60 DATA CO.SC, C9.3E, 23, CD.SC.CS, 3E, >IG 

06,CD.SC.C9,3E,23,C0,SC,C9,3E.01,C0 

,BC 

90 DATA C9,F3.3E,FF,CD.SC,C9.21,00, )ID 

0A,Q,ES,C6,FB.CD,1C,CS,3A,U,AS,FE 

,00 

100 DATA 26. 12,3C,32.14. AS,32,26,A5 >BM 

,3A,4B,AS,C6,18,32,4l,AS,C3,t2.A5.C 

i,a> 

110 DATA 0f,W,CD,O3,B9,C9,C0,0O,A5 >XD 

,AF,CD,0E,BC,3E,07,32,14,A5,32,26,A 

5,32 

120 DATA S7,A5,3E,CO,32,4B,AS,CD,00 >UL 

, AS, 21. 00. DO.l 1.00. 02. 01, 00,06, ED. B 

0.3E 

130 DATA C9,32.8i,6B,3E,40,32,64,6E >TL 

,32,24, 73, F3. 01, 7E.FA, ED. 79, (3,96,1 



qui 



GAGNER AU LOTO 

un rêve qui peut devenir 
réalité avec 

LOTO - MATIC 



trouver facilement les numéros 

le plus de chance de sortir 

• établir scientifiquement 

les grilles les plus performantes 

grâce aux tests du Lotoscope 

• contrôler sans peine 

les résultats de vos jeun 

Editions écran et imprimante 

Documentation détaillée 

- CADEAU contre 4 timbres 

INFORMATIC Applications 

B.P. 78 -67800 BISCHHEIM 

Tel 88 33 58 85 



BULLETIN D'ABONNEMENT 




1 1 NUMEROS 215 F 



Adresse : 
Code postal : 
Dote: 



Signature 



Merci d'écrite en majuscules. 

Bulletin à retourner à l'ordre dm Editions SORACOM. 



LES ABONNEMENTS 
NE SONT PAS 
RETROACTIFS 



Pour les étrangers le règlement se 
lait soit : 

■ par eurochèque (numéro de carte ir 

crit au dos) 

• par mandat international 

- par virement CCP 794 1 7 V Rennes 

Ci-joint un chèque libellé à l'ordre de : 

Editions SORACOM 

La Haie de Pan 

35170 BRUZ 



EDITIONS SORACOM 



SORACOM OUVRE SON SERVICE LECTEUR VPC 



Afin de satisfaire plus directement ses lecteurs, SORACOM ouvre son propre service de vente par correspondance. 




( CATALOGUE ) 

COMPILATIONS CPC 

Vous recherchez les anciens numéros de CPC ? 

Vous souhaitez connaître le mode d'emploi de cer- 
tains logiciels du téléchargement ? 
Alors voici les compilations des numéros 1 à 4 et 
5 à 8 de CPC. 

COMPIL 
368 



BONDE 
COMMANDE 
PAGE 80 
rWSM(W 




80 F 



80 F 



EE3 



'î . ^T'n 



Ce logiciel permet I étude de fonctions, de s 
numériques, et la résolution d'équations 



• Etude de toutes tes fonctions à 2. 3 et 4 variables 

• Etude de suites arithmétiques, géométriques ou 
définies par une expression. 

• Résolution d équations trigonométrlques sur te cercle. 

• Possibilité de tracer dons 2 modes graphiques, et 
ddns un repère quelconque, avec une échelle variable. 

• Variations, calcul des maximums et minimums, et 
des points d intersection aux axes de la fonction. 

• Calcul de dérivées. d'Intégrales. 

• Tracé de tangentes, tracé et étude des fonctions 
réciproques. 

• Courbes en coordonnées polaires. 

• Sauvegarde et impression des graphiques réalisés. 
Disponible sur disquette 3 m pour CPC 464. 664 et 6 128. 
au prix de : 230 F Réf. : BEP001 



MULTICOURBES 

de Sylvain VIEUJOT 




GU 550104 
M C 1 3 CPC 
MC 1 1 CPC 
MC 12 CPC 
MC 308 CPC 



MC01 CPC 
MC 210 CPC 
MC02CPC 
MC 200 CPC 



ffia&ïïBaîosnis 


CU 5 50333 


APPRENDS-MOI A LIRE 


195 F 


GUS 502*3 


APPRENDS-MOI A COMPTER 


195 F 


CU 550303 


APPRENDS-MOI A ECRIRE 


195 F 


MCI! CPC 


EDUC MATERNELLE 1 


300 F 


MC 16 CPC 


EDUC MATERNELLE 2 


200 F 


MC 20 CPC 


LECTURE CP 


200 F 


GU 553463 


"Collection Micropoche Eco/»" 


150 F 


J'APPRENDS A URE 


GU 553443 


J'APPRENDS A ECRIRE 


150 F 


GU 5 53603 


J'APPRENDS LES NOMBRES 


150 F 


GU 553623 


J'APPRENDS A OBSERVER 

"Collection Réussir" 


150 F 


144 01 CPC 


ORTHOGRAPHE CE 


180 F 


L44 02CPC 


ORTHOGRAPHE CM 


180 F 


144 03 CPC 


ORTHOGRAPHE 6/5. m. 


180 F 


144 04 CPC 


VOCABULAIRE CM 


180 F 


144 OS CPC 


LES 4 OPERATIONS 


180 F 


144 06 CPC 


CONJUGAISON 


180 F 


144 07 CPC 


ORTHOGRAPHE 4/3ama 


180 F 


144 00 CPC 


MATHEMATIQUES CM 


180 F 



(Pfus de 100 iogicitis éducatifs 



paa/a&n&s 



FRANÇAIS CE1/CE2 (aida à la lactura) 

FRANÇAIS CM 

ORTHOCM 

FRANÇAIS SONS CP/CE1/CE2 

FRANÇAIS SONS CP/CE1/CE3 (K7) 

"Mathématiques " 

MATHS CE 

MATHS CE (K7) 

MATHS CM 
MATHS CM (K7) 

"Géographie " 

GEOGRAPHIE PRIMAIRE 



22SF 
300 F 

200 F 
200 F 
170 F 



200 F 
170 F 
250 F 

200 F 



(!tf<83lî 




" Mathèmatiaues" 




MC07CPC 


MATHS SECOND CYCLE 1 


350 F 


MC 206 CPC 


MATHS SECOND CYCLE 1 (K7) 


200 F 


MC 08 CPC 


MATHS SECOND CYCLE 2 


300 F 


MC 207 CPC 


MATHS SECOND CYCLE 2 (K7) 


170 f 


MC 09 CPC 


GEOMETRIE PLANE (44 ma à tarminala) 


300 F 


MC10CPC 


ESPACE ET SOUDES ( 1 M à tarminala) 


300 F 


MCUCPC 


EXAMS ■ Toui nivaaux 


300 F 


GU 01 CPC 


FONCTIONS NUMERIQUES (avac CP/M} 


2S0F 




CREER ET JOUER AUX MATHEMATIQUES 


250 F 


GU 02 CPC 


STATISTIQUES ( 1 — à tarminala) 


200 F 


GU 004 CPC 


MATRICE (a partir da la torminala) 


350 F 


GU 005 CPC 


POLYNOMES (à partir d. la tarminala) 

"Micro Bac" 


350 F 


GU 553283 


MICRO BAC FRANÇAIS < 1 — à tarminala) 


195 F 


GU SS3343 


MICRO BAC MATHS B 


195 F 


GU 553303 


MICRO BAC MATHS C/E 


195 F 


GU 553323 


MICRO BAC MATHS D 


195 F 


GU 553403 


MICRO BAC PHYSIQUE/CHIMIE 


195 F 


GU 553363 


MICRO BAC ANGLAIS 


195 F 


GU 553383 


MICRO BAC ESPACNOL 


195 F 


CU 553433 


mic RO BAC HISTOIRE 


195 F 


OU SS3363 


MICRO SAC GEOGRAPHIE 


195 F 






"Collection Génération S" 




G5 001 CPC 


DESTINATION MATHS CE1/CE3 


199 F 


G5 003 CPC 


DESTINATION MATHS CM1/CM2 


199 F 


GS 003 CPC 


DESTINATION MATHS 6/5ama 


199 F 


G5 004 CPC 


TROUBADOURS (à partir d. 9 ont) 


199 F 


GS 005 CPC 


US 4 SAISONS DE L'ECRIT CE/CM 


335 F 


GS 006 CPC 


US 4 SAISONS DE L'ECRIT 6/3ima 


225 F 


GS 007 CPC 


HAMSTERS EN FOUE (niv.au junior) 


335 F 



<§©&sa@a 




"Français" 




GU 555204 


ECRIRE SANS FAUTES ( vol. 1 ) 


195 F 


GU 555184 


ECRIRE SANS FAUTES (vol. 2) 


195 F 


CU 554784 


"Série aram. tangue française" 


345 F 


LANGUE FRANÇAISE 6*m. 


CU 554744 


LANGUE FRANÇAISE 5èma 


345 F 


CU 5S4764 


LANGUE FRANÇAISE 4èma 


245 F 


CU 554704 


LANGUE FRANÇAISE 3»ma 


34SF 


CU 554664 


LANGUE FRANÇAISE 6/5èma regroupa 


345 F 


MC 17 CPC 


GRAMMAIRE 6/5âma 


300 F 


GU 556404 


AVENTURES DE MONTE CRISTO 6/3àma 

"Ma mématiaues" 


195 F 


MC 03 CPC 


MATHS 6 


300 F 


MC301 CPC 


MATHS 6 ( K 7 ) 


170 F 


MC 33 CPC 


CALCUL RAPIDE 


200 F 


MC 09 CPC 


GEOMETRIE 


300 F 


MC31 CPC 


MATHS 5 


300 F 


MC 303 CPC 


MATHS 5 (K7) 


170 F 


MC04CPC 


MATHS 5/4 


200 F 


MC 05 CPC 


MATHS 3 


200 F 


MC06CPC 


EQUATIONS 


300 F 


MC 205 CPC 


EQUATIONS | K7) 
"Collection Micro Poche" 


170 F 


GU 553563 


FRANÇAIS REUSSITE 6.rr.« 


150 F 


CU 553543 


FRANÇAIS REUSSITE 5âma 


ISO F 


CU553S23 


FRANÇAIS REUSSITE 4àma 


150 F 


CU 553583 


FRANÇAIS REUSSITE 3*ma 


150 F 


CU 553483 


MATHS SUCCES 66m* 


150 F 


CU 553503 


MATHS SUCCES 56m* 
"Sciences" 


150 F 


GU 553783 


A LA DECOUVERTE DE LA VIE 6/5 .m. 


195 F 


CU 553683 


A LA DECOUVERTE DE L'HOMME 4/3àma 


195 F 


CU 553663 


A LA DECOUVERTE DE LA TERRE 4/3àma 
"Histoire - Géo" 


195 F 


CU 553823 


OBJECTIF MONDE n°1 [minaux naturaU) 


195 F 


GU 553703 


OBJECTIF MONDE n 2 (Am. Int., Afr., Alla) 


195 F 


GU 552883 


OBJECTIF EUROPE 


195 F 


GU 553763 


OBJECTIF FRANCE 
"An a la îs" 


195 F 


CU 555244 


ANGLAIS COLLEGE DEBUTANT 6/Sàma 


195 F 


CU 555234 


ANGLAIS COLLEGE CONFIRME 4/3âma 


195 F 


CU 552933 


VISA POUR HYDE PARK 6âma 


330 F 


CU 553003 


BALADE AU PAYS DE BrG BEN 6/Sàma 


325 F 


GU 550403 


ENIGME A OXFORD 4/ 3a ma 


335 F 


GU 553343 


BALADE AU PAYS DE L'ANGLAIS 


730 F 


GU 339 CPC 


GRAMMAIRE ANGLAISE 6âma 


336 F 


GU 340 CPC 


GRAMMAIRE ANGLAISE Sâma 


336 F 


CU 379 CPC 


GRAMMAIRE ANGLAISE 4èma 

"Allemand" 


336 F 


CU 553033 


BALADE OUTRE RHIN 6/5 «m 


225 F 


GU 550383 


ENIGME A MUNICH 4/3ama 

"Espaanol" 


225 F 


GU 550363 


ENIGME A MADRID 4/3àma 


225 F 


GU 554384 


BALADE EN SOUS-SOL A SEVILU 
"Micro Brevet" 


220 F 


MB 001 CPC 


FRANÇAIS 


220 F 




ALGEBRE 


220 F 


MB 003 CPC 


GEOMETRIE 


220 F 


MB 004 CPC 


HISTOIRE 


230 F 


MB 005 CPC 


GEOGRAPHIE 
"Collection Mutticours" 


330 F 


GU 557064 


MULTICOURS 6am« 


345 F 


GU 557084 


MULTICOURS 5àma 


345 F 


GU 557104 


MULTICOURS «âma 


345 F 


GU 557134 


MULTICOURS 3àme 


345 F 
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EDUC-MATERNELLE-1 
NIVEAU 4 3 6 ANS. 



MC 15 CPC disk 200 F 
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Appw>uoge det ncmbret jt o v 
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MC 18 CPC disk 200 F 



FRANC AIS-CM. NIVEAU CM1 

CM2 SIXIEME 



MC13 CP Cdlth20OF 

Un '.ch.«- n.«o u CM l CM2 de 70 dteiee. m faum, « 
!-Ba«cipripoitèi(7«:É'»E«AVC»« Ceneopnon 

[!« «/Ou AVOIR Owet tv|«, COTipMnwil d'obi* direct 

recl. motculrri Ou l*fririm. un gui*- ou &*>** 

A COQue FouW. une VnoJicaoon du corrige 1P0 viïuollte 

Un hcprtrr de phraw. ev égalerne™ fourni, ooi* qu'uni 
permenonr lo crèarion ce tel propret llchieri d'e-erclc» 

Con|uqoilon ce module penne' O l'Atèue d'appri 



HATHS-3- ALGEBRE 

POUR LA CLASSE DE 3EME 



MC 05 CPC disk 200 F 



EQUATIONS ALGEBRE POUR LES 
CLASSES DE 3EME ET 2NDE. 






x> eiprit d'onaryu» e" découle Ira régie, e 
rage. U uni de ta leOu-j ■ de flt«««, e 



i",^:n:,v."HEii 

MC 01 CPC disk 200 F 
MC210CPCK7170F 



- Ronger dei nombre, en Ordre Cn>ttonr e> d*f 'lïJiuïn- - Corr. 
parer de. nombre, [lopefleur inférieur) ttfrrne. prrjrjulrt - Corrip 
«rpmouoill. î. i. 10. ÎO. «S ) - Cotculi u. le, opèro- 

•O'I eterrenui'H |ioO*Ou de double entrer] - Comp*r ha mort 
retrouver] - Sy-*" ei ovale» 



.^f^T.: -s» i: , , i--" i n , iir"-'r^^ 

MC02CPCd!sk250F 
S MC2WCPCK7a)0P 

Ce rjg.ceJ comprend des module, lur en colcull [Operollrr 
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MC12CPC disk 200F 
MC2O6CPCK7170F 



I - Compién. de. mon , 

? - CornpreHjr -mi pKnJI 
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Pmsm 
MC1K 
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CPCdlW200F 
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MC 19 CPC disk 200 F 


Couneiew 
- le* g-onde 


Ter-e < le. pofcili tard -ou. - .r> totum 
eou et le. ™ en France -taipone 
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MC 20 CPC disk 200 F 
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MATHS SECOND CYCLE-1 . NlVt 

SECONDES A TERMINALES 



HC 07 CPC disk 250 F 
MC2O6CPCK7 200F 




- Apprenti ingerjtvc rappel de COurl odopte 

■ Sevuon oeneiou- 




dewn de. TBANSFOEMATIONS GEOMf 

«Ouf S liions* oni. namheiu,. rolonor- >yri*)Me adale et ter. 

de. haute. Kmple. ton*, mangle, tatonae I 




MATHS-5. NIVEAU 5EME 
(NOUVEAU PROGRAMME) 



< de ■■■■-■. de I ■ -tr< - Chef, 
ongle, de [-■■>;-■.-> - De. complet de ■ (et |iolidet 
WIOM.e— ■- J - 
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MC 14 CPC disk 200 F 



HC 04 CPC 200 F 



GCD eiPPCM -CofcJ. 
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- I hchiei m la ! t«xi*on huncat"» 
VOCAIS1 

- 3 bdiien ANGIAIS-f (AMCAIS 



oue le. propre. VOCA1SST 
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Ui ON DE COMMANDE 



A «xpédJT g : Edition» SORACOM 
La Hai» do Pan -351 70 BRUZ 



DESIGNATION 



Pour thaqua- articl», mntouraz /• ou Imt n choisis. 

ANCIENS Nos AM5TAR A CPC 

N" 26 -27 -28 -29 -30 -31 -32-33-34 

35- 36 

DISQUETTES AMSTAR A CPC 

N°20-21 -22-23-24 Al 

■ .ne diiqustM réunit 2 numéro» conjéculifi d'Amilor & CPC] N 

ANCIENS Nos AMSTAR 

N°5- 



12- 



- 15 



18 F /unité; 
20 F (on.lèl 
22 F furt(éj 



Franco 
Franco 

Franco 



DISQUETTES AMSTAR 

N" 1 |du n" 1 au 8 Indus] - N° 2 [du n° 9 ou 1 6 indui) 

N°3 1dur>°l7a U 25inclu>| 

ANCIENS Nos CPC 

N» 10- 11 - 13- 16- 1B- 20 -23 -24 -25 -26 

27 - 2B - 29 - 30 - 3 1 - 32 - 33 - 34 - 36 - 37 

ANCIENS No* HORS-SERIE CPC 

N° 4-6-8-9-10-11-12-13-14-15-16-17 
DISQUETTES CPC ET DISQUETTES HORS-SERIE CPC 



18-19 {uns disquette réunit 2 numéros comécutil» ds CPC) Abonna 

HS1 - HS2 - HS3 - HS4 - HS5 - HS6 - HS7 - HSB - HS9 

HS10-H511 -HS12-HS13-HS14-HSI5 -HS16-HSI7 Non abonné 

ABONNEMENT 6 DISQUETTES (non rétroactif) 

DISQUETTES "ARCADES" ♦ câbU (nouvelle édition) 



1 10 F •■ 

140 F {un.lé} 

600 F 

112F 



Franco 



(Kit Téléchargement AMSTRAD CPC) 



LOGICIELS EDUCATIFS - t IVRES - DIVERS 



DESIGNATION 



Forfait port * 10 F par logiciel al 10 % pour livras 



i .JAWUiiMMa ' 



J Facultatif t recommandé + 1 F par commanda 
MONTANT GLOBAL 



Se joins mon règlement : _| choqua bancaire J choqua postal J mandat 



«S 

Dole d expire 
pua** lai mm 


PAYEZ PAR CARTE BANCAIRE 


,,on 1 i i 1 Siqnotvre) 


éros de h carie, la daté •' ligner) 



Signature 



Nom: 
Adrssss : 


Prénom : 




Code Postal : 


Villa ■ 
ICKIRl EN MAJUSCULE S 




La place raie 
d'arrivée Pat 
il est peu probabli 







i, celles-. 






si limitée En conséquence. 

toHelues sont systématiquement re jetées De mèi 

'généreux donateurs" de matériels ou de logiciels, 

philanlropes ne seronl insérées que si la place libre le pi 

endre ou échanger des listes ou copies de lo 

s "d'origine", ainsi que toute annonce incitont au piratage. 

.equence, réfléchissez bien avant d'envoyer vos tentes Les petites ann 

vent impérativement nous parvenir sur la grille (découpée ou photocopiée), le 

rédigé à raison d'un caractère par cose. 



Vds 50 revues CPC n" I à mai 89 . HS 
480 F * port 50 revues Amstrad Mag n° 1 a 
mai 89 * HS : 430 F * port, dises pleins (10) : 
220 F * port - RAMADIEH - Tel : 
54 35 85 21 - 36500 Souge 

Cherche CPC6128coul tjoyst env :2000F 
en tbe Christian HOFFMANN - La Chante- 
raie -38640 Claix Tel : 76 98 68 89 après 



Vds ou échange feu» D7 (Crazy cars II. Man- 
setl's Grand Prix. Street fighter etc.) de 55 F 
à 120 F. Tel : 2906 27.85 Demander Da- 



Vds6l28coul »impf .interf TV . 25jeux + 
magnéto * jeu* K7 + synthét vocal * joyst 
Ole : 5000 F Tel : 45 85.83 34 

Vds ou échange pour CPC 61 28 souns Ca- 
meron * kit ameharge + synth. vocal lechni- 
musique tbe. prix à débattre - Tél. : 
45 85 42 28 - Paris 

Achèterais lecteur disks DD1-1 moins de 
1000 F Tel : 21 92 45 52 après 18h ou en- 
tre I2het I3h 

Vds CPC 6128 coul * Jasmin 5*1/4 oommu- 
tabie en drive A I * très nbx jeux et ubl. + re- 
vues ♦ doc 5000 F Tel : 94 74.55 21 midi 
à 21 h. 

Vds jeux K7 : Wmtergames - VmrJcator. Oper 

Wolt - Hang on - Papertwy : 40 F runlô. 180 F 
le tout Tel ; 44.24.31 15 Demander Mehdi 

Vds6128coul t scanner ♦ DMP 2160 tjoys- 
t*ck t cordon * 100 logiciels (nbrses nouveau- 
tés) • revues 5500 F Tel 39 57 92 43 



Cherche comment taira passer en drive A mon 
drive Tl/2 sur 6128. G LOMBARDO - 236 
rue Si Caïienne- Bordeaux Tél. 5694 71 18 

Vds DMPI. bon étal » imprime listing si vous 
n'avez pas cnmprimanta * fournis doc. A dé- 
butant Basic, prix réduit. Tel : 6781 12.00 

Vds Winter Garas (original) pour CPC 6128 : 
120 F ou échanger Demander Eric au 
73.36 15 46 après I7h30 Chamaliéres 

Vds CPC 464 couleur * joysri. * 25 logiciels 
* 10 revues * 2 livres de programmes, prix : 
3200 F MINES Tel : 68.88.51 61 

Vends Amstrad CPC 6128 mono * livres + 
joysticks + non jeux (Grand Prix 500, Tua 
cer. Androfd. Flipper, Tennis), très bon état. 
5000 F. GriHarin, St-Romain de Benêt, 17600 
Saujon Tél. 46 02 10.69 



Vends interface Midi DHCP Electronic*, pour 
61 28 avec séquenoeur 8 pistas, valeur 1 500 F, 
vendu 950 F Tel 45 69.10.37, après 18 h 

Vds ou èch D7 : Barbarian 2, Crazy Car* 2. 
Lasi Duel. Wec. Titan, Op. Wolf Cherche 
Double Dragon. Renegade III. Tel 77 72 30 92, 
après 18 h 30. 

Vds imprimante DMP 2000 : 1000 F 2ème 
drive FD1 : 700 F. Silicon disk 256 K : 400 F 
Orphée 100 F. tout 1700 F Tel 3092.08.16 

Vds 6128 mono. 2 toytbcks. 150 jeux, lec- 
teur de K7. copieurs, manuel, revues Tel 
Cames, 93 69 25.78. Mcheel Barbier. 3200 F 

Vds cfgitaliseur Ara, acheté Noël 88. L b. et. 
Prix 1000 F. Tel 74568895 demander 
Alexandre 

Vends disquettes pleines de jeux pour 6128 
Prix ; 20 F (Manor MortevieHe. After Bumer, 
Wec Le Mans. Rex. .). Tél. 83.71 42.58. 

Vends Amstrad 464 mono * joystick + revues 
tous genres + manuel • 100 jeux récents, le 
tout t b. état, 2500 F David, soir, tél. 
56.76.86.52 

Vends CPC 464 couleur : 2500 F, peu servi 
+ nombreux jeux + manette t emballage t 
mode d'emploi Rubbioni Cyril, Plan Dorgon 
Tél. 90.73.12.57. 

Vends CPC 1 è 26 sauf 2, 3. 1 1. HS 3 A 6 et 
Amstrad Mag 1 à 26 sauf 20 et 1 reliure cha- 
que M. Foulon S , B, rue A. Camus 60180 
Nogent 



Vds CPC 6 1 28 coul . juin 88. l b et + Gehip 
♦Cblood * Maths 2ème cycle * Geom. * Fran. 
CM . 20 DK ♦ 100 (eux . 2 joys * doubleur. 
Val 5750 F. oédé 4600 F. Tel 45 31.82.25. 

Achète jeux DSK6128 Faire offre par écrit 
Ungem Daniel. 8, rue Caurry. 59400 Cam- 



Cherche tous les ivres cahiers tf Amstrad t 
ass /dosasse mbleur pr 6128 Faire offre : 
Guebels Guy. 7, rue Hauts 55700 Stenay 



Vds CPC 464 c ♦ DD1 1 • joystick t housses 
* 200 logiciels (jeux ♦ util ) * revues : 3800 F. 
Tel 34.73.03 36 après 1 7 h, dép. 95 Ex état. 

Vds séparément clavier 6128 (1700) et mo- 
nit coul. CTM 644 (1300) Berna. 15. pass 
du Génie. 75012 Paris. (1) 43.72.64.64 

Urgent ' Vends 464 coul. récent • logiciels 
(80) dont news (Opération Wolf, Savage, 
Dragon Ninja. .), le tout 3200 F. Tel 
486932.12ap. 19 h. 

Vds moniteur mono GT 65. très peu servi, 
500 F Tél. 48.73.33 19 après 19 h deman- 
der Sebastien 

Echange news sur 6128 Cherche HKM. Vi- 
gilante. Renegade 3 : sérieux, durable. Tho- 
mas Fabien. Legt Philippe Lebon 52300 Jom- 



Vends jeu électronique CBS Vidéo ♦ 4 joys- 
ticks • 14 K7 « 1 volant, l b et. 700 F 
68 39 57 38 après 18 h . Nicolas Fayon 



ANNONCEZ-VOUS! ] 


LES PETITES ANNONCES ET LES MESSAGES 

Attention, vos PA seront mises sur le serveur avant la parution du journal 












































































































































































































































Coupon à renvoyer accompagné de 4 timbres à 2,20 F à : 
SORACOM. La Haie de Pan - 351 70 BRUZ 




Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 



AMSTAR 

CPC 



La Haie de Pan - 3SI70 BRUZ 

Tel -99.52.98.11-Télécopie 99.5178.57 

Serveurs : 3615 ARCADES ET 3615 MHZ 

Terminal NMPPE83 

Géranl, directeur de publication 

Sylvio FAUREZ 
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Abonnement* - Secrétariat 
Catherine FAUREZ -Tél. : 99.52.98.11 



1ZARD Création {Patrick SIONNEAU) 

15, rue St-Melaine 

35000 RENNES - Tél. : 99.38.95.33 



GESTION RESEAU 

SORACOM S. FAUREZ 
Tél. 99.52.7B.57 Terminal E83 

La srticle» « prognunnies que mus publics» dwu ce 
numéro Unéfkicm, pqui une grande pmB. du dms d"sia=ir 
De ce fui. ils ne peuvent eue limite*, contrefaits, copie» 
p«quric^e procédé que ce soit. mésnep*rtjellemems«ni 
laiaorisiuon éehla de la Société SORACOM a de lauleur 
eoncemé 1 c opinions cipnmccs n'cngigcnl que ■ res 
ponsssiliié de leurs luieun Lei différenis monugea pré- 
scnlés ne peuvent eue réalisés que dira un "m pnvé eu 
sœnufWfue nuis non conwnefcial. Cta réserves s'ipnliqua* 
également «m logiciels publiés dans ti revue. 

AMSTAR * CPC est édité par les Editions SORACOM. 
édiuice de PComprtble* Magazine, ASTROLOG1K Pis- 
tique. MEGAHERTZ Magazine KCS Remes B 319 816 



dame d'AMSTRAD GB et d'AMSTRAD 



r®3 

1 Presse FAUREZ-MELLET 



Urgent I Vd» CPC 464 * mo 

Uck .jeu» * DDM t FDM * 
débattre Tel : 77 28 74 36 



Achète Turbo Pascal « Grapti poket Word- 
star avec manuel origine - Faire offre DU- 
RAND A. - Tour 1 - La Feuillettera - 42390 
Villars 

Vcb|euiK7ooginaui,pfisadé6al»e.cacteaui 
pour les 6 premiers acheteurs Tél. 
43.08.51 29. demander Régis, après 19 h 

Vds CPC 464 couleur « DDI • joystick « jeux 
et utilitaires • revues : 3000 F Dnve 5*1/4 
pour CPC6128 800 F TAI 60 83 47 56. apr 

19 h. 

Vends Amstrad 612B état neuf ♦ disquettes 

• manettes * bureau ordinateur noir, l'ensem- 
ble 3500 F Sébastien ANDRE Tel 
16 44 08 43 11 -20 Hauts de Fosseuse- 
60540 Bomel 

Vds 6128 mono ♦ 50 logiciels 2700 F. digit. 
ARA * Pnnter Pack II : 800 F. adapta Péntel 

* synthé Tectimrnusic : 800 F * logiciels Tel : 
39 80 48 56 

Echange faux DK. cherche utilitaires et DK de 
dessin (CPC 6128). Tel : 69 44 42.75 après 
19h30 Demander MASSIMO Réponse assu- 



Vds Amstrad CPC 464 . DD1 . joystick . (eu* 
disks cassettes, le tout : 2500 F Tel : 
43 36.6909 Demander Max 

Vds Amstrad CPC 6128 coul * 140 jeux t 1 
joystick + manuel, garantie encore 6 mois, le 
tout 3000 F Tel 44 76 08 74 

Vds Amstrad 464 coul * 150 jeux + 2 joys- 
ticks » manuel (très bon état) : 2500 F. Tél. : 
4540 4281 Demander Manu - Paris 14 

Vds n° 1 de Micro +. journal digital paru pour 
CPC : 20 F sur K7 Renseignements au 

34 85.75 04 Demander Vann LETANOUX. 



Echange ou vends toutes dernières m 

tés sur disks, connues ou inconnues Tel ; 

47 60 23 59 A partir de IBh. 

VdsCPC464 + moniteurcoul .nbxjeuxdont 
op Wotf, IK) * revues, le tout 200 F Tel : 
2023 14 30 de 17h à 20h Demander Gré 
gory 

Vds lecteur MAI Whild West pour TS CPC • 
4 DK cause passage sur PC, cédé : 1400 F 
sous garant» Tel 91 693225- MART1GUE. 

Fanzine pour 1 timbre A 2.20 F. la retour du 
Strad vivant. BONNEVIE Hervé -47 rue de 
Gascogne - 51350 Cormontreuil 

Vds CPC 664 (disk) coul • pystick » 40 disks 
* copieurs * manuel + lect. K7 » 30 K7 + li- 
vres + synthé vocal très bon Atal : 3200 F 
Tel 39 71 09 75 

Vds CPC 464 1 110 jeux, revues * manette * 
lecteur de disquette 2990 F ou séparé tbe 
Tel 44 48 39 95 



Vds disks 3" : 22 F l'un port compris, cause 
passage au 5*1/4 Tél. 34 75 81 01 après 18h 

Vds MOS • 2 manettes * lecteur de casset- 
tes + jou* * crayon optique et livres 1 500 F 
BASTIAN Laurent Tel 82 52 23 61 

Achète DDI-1 1000 F • jeux sur casquettes. 
réponse assurée Tel 620992 89 après 18h 
Demander Alexandre 

Vds CPC 6128 coul. . 34 DK (jeux, utilitai- 
res ) + magnéto K7 + K7 * cordon impri- 
mante * revues 3000 F TAI. . 45 94 62 10 
après 19h 



} revues CPC n° 1 A 21 * HS n° 1 
A 7 . Amstar n" 1 A 15, taire ottre A GUE- 
BELS Guy - 43 rue Champêtre - 6788 Ha- 
lanzy - Belgique 

Vds lecteur DDM (3 pouces) pour CPC 464 + 
(eux * 1 joystick, le tout bon étal 1800 F Tel 
9491 44 46 Christophe Urgent I 

Echange lecteur 3" pour 6128, Qwerty con- 
tre lecteur 5" 1/4 Tel 60 80.24 57, après 18 h. 
David Benjamin 

Vds disquettes de jeux A bas prix (dont news). 
Joindre 2 timbres pour liste è : Le Squer, 1 1 
bis, rue de Raime 56270 Plcemeur. 

Fou ! Je recopie pour vous listings pour 1 F 
les 10 lignes + 10 F port + K7. Renseigne- 
ments : 3485 7504. demandez Letanoux 
Yann. 

Vends Super Paint, Taspnnt, HawaI (dise) et 
Easy Writer, Wonder Boy (K7) Tel Bruno 
au 55 77,14.71. 

Echange jeux sur 6128 Tel 84 9283 44 A 

partir de 17 h Eddy Labouré. 20, Grandes 
Rues 70210 Vauvillers 

Gagnez bcp d argent honnêtement et chez 
vous, par le jeu Ec. A La feuille d'or. 137. rue 
de Verdun 14800 Deauville. 

Vds CPC 464 coul * manuel + synthé vocal 

* manete • 45 jeux pour 3000 F (urgent) 
Philippe au 79 73 04 56 A partir de 20 h 

Vds 464 coul. * DDM + housse * 2 joys. * 
revues t 120 jeux + posters • manuels Par- 
tait état ; 5000 F Pour plus de rens tel 
94.91.44.46, Varuroq 

Vends 464 t DDI • DMP 2000 * scanner » 
Vies . 266 K . 1 20 D7 . 10 K7 • synthé voc 

♦ 100 revues pour 12000 F. Tel 30 38 03 75 

(Pontoise). 

Cherche The PawrVGuild Of Thieves" * no- 
tices (originaux ou copies) en échange de nbx 
iDg Appel ; David Bossard au 40 63 17 61 

6128 échange hyper news. Jungle Book. Crazy 
Cars 2 FanoeHi Richard 4 av Foch 45170 
Neuville aux Bois Tel 38.75.51 .73 



Photocomposition SORACOM - Photogravure SCANN-OUEST 
Impression SNIL - Distribution NMPP - Dépôt légal à parution 
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W0NDER60Y est de retour! 

Et avec lui. voici le plus terrible des challenges : l'aventure cauchemardesque 

opposant les forces du mal et du bien. 

Encore une fois le peuple pacifique de Wondartand se tourne veis SUPER V 

DERBOY pour qu'il les libère des griffes de MEKA et de ses monstres rr 

LE FUTUR DE WONDERLAND EST MAINTENANT ENTRE VOS 4 
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SORAGOM 



MEDIA Box 

CASSETTES 

VIDEO (L) 

222 x 135 x 348 mm 
83H *5l M xJ33H" 

N° 310.504.0 

Pour 9 cassettes 

Vidéo VHS, 

V2000, Betamax 







Science* naturel»* : une midalion a la rjémar Science* future 

ctascianlqueeliuiloabiottcqutïdumorcla mal» « végétale 

vivant abordée avec du mes simples lame de raspirali 

Gcofr^pAar- découvert) de le va/ieM des tneaus deiocomoiion 

rutintteinMianarnerpréUlKVidecailet.gra- GéognpM* : voy 

phques et autres denrée* cfamuque* m* découverte du nunnjew. de* to'ces 

Messe* de r Amérique «in et de rAlnque 

Jeu :1|eurJr*ertaa*rat découvrir J*u:l jeu dnrertssart é découvn 

RéfGU 557084 245 F RéIGU 557104 245 F 

Utilisai Je bon do commande SORACOM page 64 



POUR CPC 6128 EXCLUSIVEMENT 

FmçtlM mallrae * la «dure avec la sieooi franc*'* : lett de pertermance 0e lecture luma, 
jwcpalJon ma» aussi tf un telle nef» et une vanélé S eierccea de com- quelné de compréhension appréciation du sers et 

préhension tfarulyseetde logique du style grâce lune pédagogie active 

mon a la biologie ani Science* nerurelM* : découverte de la Terre et Sciences nafureft» : une initiation a la biologie 
rakmenlalion. le sy* de son hinoirBéiraverl les granOs phénomènes humaine apprenant é observer et é interpréter W 
le de reprod'JCIion ou géologiques abordes grâce é des leites de con comporte ment s de notre corps 

naesance des anmarons Gtographm: analyse de canes il interprétation de 

«mbrieots proposai! GecfrapMt.'toul sut 'Europe ses eut* Ses fit- diverses données statisKjues pour une étude de 

i ses réussites ses afcances k modo tf em- la Frêne* dé I9B9 région», villes, insiuions. ria 



Réf. GU 557064 : 245 F 



Jev : 1 )eu dnenooant é découvrir 

Rél GU557124 245F 
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RESULTAT CONCOURS 



LISTING : CARAC 



m\ 



TRUCS ET ASTUCES 



FANZINES 



BANC D'ESSAI 
MATERIEL 



4 
CONCOURS 



APPRENONS 
A PROGRAMMER 



VOUS AVEZ 
DIT ASTUCES ? 



ACTUALITE 



CA0 3D 



ABONNEMENT 



PREVIEWS 



BANCS D'ESSAIS 
LOGICIELS 



LISTING : KRISTAX 



INITIATION 
A L'ASSEMBLEUR 



BANCS D'ESSAIS 
(suite) 

Couverture : Xénophobe 
de M1CROSTYIE 




V' ous l'avez déçois . ;M er. <, <dusivïté dans 
notre numéro di'aôfttj^gfe mois-çl nous 
.vous proposons de |$ffie! équipe avec 
DANGEROUS pàràxMMi ^i0asion''àe ga- 
gner. ^.)lQ^Vouléz ^e^ipâjték 7 Allez fJoftË 
. iairé un tour du"tô(éd#fegiic d'essai déjà 1 , 
dans nos colonnes .■■■</ M 



- Nommez legdiffêt 



- Dans quelle région: Rick s' 'S 




1er prix : 1 walkman 

2ème prix : 1 logiciel + 1 joystick 

Bènteprix : 1 logiciel 

lime et 5ème prix : 1 tee-shirt Firebird 

du 6ème au lOème prix : 1 poster Rick D; 

TON» — — *""" 

pu début du jeu. 



- Quel. est letrésor que Rick doit retrouver en Egypte ? 

__^__^ __ — __ . 



-^oqjpen de niveaux y a-t-il dans le jeu Rick Dangerous ? * 




- Question subsidiaire. .■,>■■■ ■- ,— 

^J^pjmez le nombre djïbujlerins comportant toutes les bonnes réponjsgs que nous recevrons. 

(en cas d'ex aequo, un tirage au sort sera effectué) 



Renvoyez ce,questionnaire à CONCOURS MENSUEL AMSTAR' ■$', 

Editions SORACOM - B.F..85 -35170 BRUZ S \^ 

Aucune photocopie ne sera acceptée. Pour le mineur gagnant, l'autorisation des parentkse^néce^saire. 



DERNIER DELAI LE 15 OCTOBRE 1989 



Prénom 



"Adresse 

Code postal 




Si je gagne, je voudrais mon lot sur: □ K7 Q DK 



Signature : 



WBT 



ACTUALITE 



Sfmi 




A part Indiana Jones version aventure 
qui devrait être là au moment où je 
vous parle, on attend une autre 
adaptation de film : les Incorruptibles. 
Elliot Ness et Al Capone se livrent 
toujours une bataille inouie. Puisque 
nous sommes dans les films, tenez voilà 
Batman qui est annoncé à grands fracas 
par Océan. Batman le jeu reprendra 
l'intrigue de Batman le film sur cinq 
niveaux différents. Le premier nous 
placera dans une usine de produits 
chimiques et vous lancera à la poursuite 
de celui qui va devenir le Joker. Tout 
cela pour se terminer dans la cathédrale 
de Gotham City avec une confrontation 
ultime entre la chauve-souris et le Joker. 
Rassurez-vous il y aura aussi la 
Batmobile et le Batwing. 

TMofDCComicsïnc. ©1989 




A£TUAL/T£ 



Broderbund 



Wanted 



On les a déjà annoncés : ShufflepackCaféet Lode Runner mais vous allez les voir ce 
mois-ci car on vous a trouvé des photos, sur Atari certes, mais des photos très jolies. 
Je vous rappelle que Shufflepack Café est un simulateur de hochey sur coussin d'air . 
et que Lode Runner est la reprise d'un classique du jeu informatique. 



Cosmic Software recherche des 

programmeurs et des graphistes avec 

des connaissances sur le Z80 et sur 

l'Amstrad CPC. Vous êtes de ceux-là? 

Alors il faut écrire gaillardement à 

l'adre 

Cosmic Software 57, rue du Tondu 




Mis à part la preview présentée dans ce 
numéro (Windsurf Willy) Silmarils 
annonce une autre nouveauté : 
l'adaptation du logiciel Targhan sur nos 
8 bits préférés. Targhan est un guerrier 
accompli partant pour une quête 
mystérieuse que lui seul peut 
accomplir. Evidemment il devra 

près des siens en bonne santé 
obstacles qui l'attendent en 
chemin ne sont pas de ceux que l'on 
peut facilement écarter {dragons et 
autres créatures pas catholiques). 

SILMARILS 

1, rue Albert Einstein 

77436 CHAMPS-SUR-MARNE 

Tél. : (1) 64.68.01.27 



Shufflepack Café 




Virgin Games 



Une grande nouvelle : les Monty Python vont être adaptés en jeu 
vidéo!. Peut-être une mauvaise nouvelle : comment va être traduit 
i'humour si particulier de l'équipe britannique. Concernant ce 
second point on est un peu rassuré car les personnes qui vont se 
charger de cette adaptation sont des passionnés du "Flying Circus». 
Alors, si une hirondelle d'Europe ne fait pas le printemps... 

VIRGIN MASTERTRONIC LTD 
120 Campden Hill Road 
LONDON W8 7AR 
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Compilations 



HGatwave regroupe Zynaps, Nebulus, 
Netherworld, Firelord et Ranarama. 
Ces titres ont un point commun : ils 
sortent tous de l'atelier Hewson c'est 
donc une compil Hewson. 
Monsieur Océan n'a pas voulu être en 
reste et nous a pondu un paquet de 3 
programmes intitulé modestement 
«Justiciers». Le titre laisse supposer 
qu'il y a de l'action dans l'air, ce que ne 
démentira pas Robocop, Rambo III et 
Dragon Ninja. Comme vous le voyez, 
rien que du bon dans cette compilation. 
Pour les vrais passionnés de foot voici 
une compilation regroupant 4 logiciels 
:Footballer of the year, Gary Lineker's 
superstar soccer, Gary Lineker's 
superskills et Roy of the Rovers sous le 
titre de Soccer Squad. 
Enfin Games Crazy vous propose : 
Alternative World Games, Galactic 
games, Supersports, California Games. 
Tout cela concerne évidemment le sport 
et porte le label de Gremlin. 
Tiens une compilation d'utilitaires c'est 
nouveau. En tous les cas voici la Box 
Util CPC qui regroupe 6 logiciels ; 
Impression, Imprim'image, Silipack, 
Echosoft, Zenith II, Ades & Debugg 
tout cela pour 390 F. 







PREVIEW 
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NIGHT FORCE 



Que la force du chevalier soit avec toi ! C'est tout ce que 
* l'on peut vous souhaiter si 
vous décidez de vous risquer 
dans ce jeu en 2 et 3 dimensions 
qui vous demandera d'allier 
beaucoup de qualités en même 
temps ; en effet, il va vous falloir 
de la stratégie, de la réflexion et 
de la rapidité pour ne pas voir 
poindre à l'horizon vos derniers 



Toute l'histoire est liée aux sept 
sorciers de Belloth, gardiens des 

tours maudites, qui ont commencé à semer la pagaille le jour 
où ils ont décidé de se Tévolter. Cette décision est très inquié- 
tante car ces personnages savent maîtriser les portes spatio- 
temporelles du grand Maître ! 



Ces sorciers n'ont donc rien trouvé de mieux que de larguer 
les amarres des tours des maléfices et d'ouvrir les portes du 
temps pour répandre désordre et illogisme. 




Heureusement, aujourd'hui tout espoir est permis carie grand 
Maître a décidé de faire appel à vos services afin de préserver 
l'ordre chronologique universel. 

Pour y parvenir, une seule solution : détruire chaque tour 
abritant les êtres malfaisants. 

Durant le jeu, vous allez évoluer dans 3 époques différentes, 
chacune d'entre elles couvrant 
une période de 4 années. 
Ainsi, vous traverserez la Préhis- 
toire, le Moyen Age et le Monde 
Contemporain. 

Bien entendu, à chaque pas fran- 
chi (ou presque), vous devrez 
■;■ faire face aux pouvoirs extraor- 

dinaires et aux maléfices des sor- 



Heureusement, votre épée magi- 
que, fidèle compagne de tous vos 
combats, est là pour vous trans- 
former en héros. 

Faites quand même un peu attention car les effets dont béné- 
ficie l'épée dépendent de vos succès antérieurs. 
11 va falloir attendre la seconde moitié du mois d'octobre pour 
découvrir Knight Force dans toute sa splendeur, mais la pa- 
tience est souvent récompensée alors !... 

Edité par. TITUS 




PREVIEW 



WlNDSURF 
WILLY 



allons bientôt découvrir sur nos écrans 
de CPC une simulation de planche à voile 



La société éditant ce logiciel est déjà 
™ bien connue par tous les possesseurs 
de 16 bits avec, par exemple, Manhattan 
Dealers ou Targhan. Voici que la rentrée 
nous apporte une bonne nouvelle : nous 



Pouvant jouer seul ou à deux, il existe trois 
niveaux de jeu : débutant, confirmé ou 
professionnel. Après avoir choisi votre 
matériel, flotteurs et gréement, en tenant 
compte de la force du vent et du chrono- 
mètre, il ne vous reste plus qu'à vous 
lancer dans l'une des 15 épreuves qui vous 
sont proposées sur autant de décors dif- 
férents. Les passionnés de windsurf n'au- 
ront aucun mal à situer ces décors puis- 
qu'il s'agit d'éléments du parcours du 
championnat du monde. 



Le starter ayant donné te signal du dé- 
part, à vous d'effectuer le maximum de 
figures comme le water start, le table top, 
le surf, le barrel roll, le body drag, le one- 
and-jump ou le killer loop. De plus, vous 
pouvez accélérer en faisant du pumping ; 
seulement, prenez garde aux différents 
obstacles que vous rencontrerez dans 
chaque parcours et qui vous obligeront 
à faire des slaloms ; baigneurs, rochers, 
radeaux, sous-marins, icebergs... Et, bien 
entendu, pour noter tout cela de manière 
impartiale, vous devrez affronter les re- 
gards glacés des juges. 
Sortie prévue courant septembre. 
Edité par :SILMARILS 






MAFFIA 



Nous vous l'avons déjà annoncé dans 
* la rubrique actualité d'un de nos pré- 
cédents numéros ; maintenant, nous 
sommes en mesure de vous présenter vi- 
suellement un premier aperçu du jeu. 



Le principe, vous le connaissez depuis 
longtemps puisqu'il s'agit d'un jeu d'ac- 
tion du même type que Prohibition qui 
a eu son heure de gloire il y a déjà quel- 
que temps. Il faut donc tirer sur ce qui 
vous menace mais attention pas sur tout 
ce qui bouge ! Il n'est pasquestion d'avoir 
la gâchette facile et de tuer ainsi de pau- 
vres innocents. Vous pouvez donc décou- 
vrir un écran présentant une façade d'im- 
meuble qui laissera apparaître les tueurs ; 
mais il y a également une partie de course, 
poursuite à bord de voitures. Enfin, en 
bas de l'écran, il y aura un personnage 
qui sortira d'une porte et traversera l'écran 
pour passer dans un tableau adjacent. 
Pour le tuer, il suffira de le toucher un 
certain nombre de fois. 

Le test complet de La Maffia sera lui aus- 
si dans notre prochain numéro puisqu'il 
doit normalement sortir dans le courant 
de ce mois-ci. 

Edité par : COSMIC SOFTWARE 
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PREVÏEV/ 



Hamsters 

en FOLIE 



Les auteurs de ce logiciel ont déjà fait leurs preuves dans 
* le domaine de l'éducatif avec par exemple, Destination 
Maths ou Les 4 saisons de l'écrit, logiciel testé dans ce numé- 

Avec Hamsters en folie, ils se lancent dans le jeu avec une si- 
mulation économique et humoristique. 

Le point de départ de cette aventure est le leg que votre grand- 
tante vous fait à son décès. 

Le moins que l'on puisse dire, c'est qu'il est original puisqu'il 
s'agit d'un élevage de hamsters qu'il faudra faire 
fructifier. 

A partir de cet instant, vous risquez fort 
de ne plus savoir où donner de la tête 
; il va falloir acheter de la nourriture, 
des cages ou des magasins à bon 
escient si vous ne voulez pas vous 
faire surprendre par des fléaux 
tels que la famine ou les épi- 
démies ! 

De plus, vous allez devoir 
accoupler vos hamsters 
mais, attention, pas 
n'importe comment 
car, sinon, vous cour- 
iez à la surpopula- 
tion !... 





pouvant se présenter, il faut aussi considérer les impôts à payer 
ainsi que les nombreuses charges et réparations qui risquent 
fort de vous tomber dessus en permanence. 
Pour pouvoir vérifier la progression de vos décisions, vous 
périodiquement à l'écran l'état de votre élevage et de 
votre fortune. 

Pour rendre ce logiciel attrayant et convivial, les auteurs ont 
apporté un soin tout particulier aux animations graphiques, 
aux bruitages et au mode de manipulation qui sera du type 
«souris». 

Vous pourrez trouver dans nos colonnes un banc 
d'essai complet de Hamsters en folie dès notre 
prochain numéro. 

A noter que ce jeu s'adresse aux personnes 
de 10 ans et plus ; par ailleurs, il n'est pas 
impossible qu'une version «adulte» voie le 
jour dans laquelle vous pourrez vous po- 
sitionner sur des marchés étrangers, faire 
de la pub à la TV, le tout en tenant compte 
de l'actualité sociale et politique. 

Edité par GENERATION 5 



Défia l'intelligence 



m 



^ Non, non, vous pouvez rester ici ce 
n'est pas parce que nous parlons d'in- 
telligence que vous ne devez pas vous 
sortir concerné. Tout d'abord, sachez que 
"Défi à l'intelligence», c'est un livre et 
un logiciel. Le livre ne fait pas référence 
à la disquette, en revanche le contenu de 
la disquette est totalement inspiré par le 
livre. À propos que contient-il ce fameux 
bouquin ? 11 s'agit d'une méthode appel- 
lée Me-Mo et qui doit permettre à celui 
qui l'utilise d'acquérir des «automatismes 
de pensée» par l'intermédiaire de stimu- 
lations ludiques. Ainsi Défi à l'intelligence 
propose différents jeux et énigmes avec 
pour tout support, le papier, le crayon et 
des figures à découper à la fin de l'ou- 
vrage. Mais passons plutôt au logiciel pro- 
prement dit. 11 y a 7 options différentes 
vous proposant toutes des jeux de l'es- 
prit. Mosaïque est le plus simple : il faut 
placer des figures sur un damier de taille 
variable et vérifier si les dessins obtenus 
possèdent des symétries verticales, hori- 
zontales ou diagonales. L'option 2, inti- 
tulée logique déductive, est en fait un 
master-mind, jeu célèbre dans le monde 
entier. D'ailleurs un des auteurs de défi 
à l'intelligence est l'inventeur du master- 

Stratégie vous met face à un damier cons- 
titués de dalles blanches. But du jeu : re- 
trouver la frontière entre deux territoi- 
res en tâtonnant au départ, puis en utili- 
sant la logique ensuite. Le Tic Tac Toe est 



mzsmmmmm 



lui aussi très célèbre (on le connait éga- 
lement sous le nom de morpion). Il s'agit 
d'être le premier à aligner 3 ou 5 symbo- 
les (selon la taille du plateau de jeu) sur 
un damier. On vous propose ici 2 niveaux 
de difficultés. 
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AlphaBïts ressemble à un générateur de 
caractères : les lettres ou les chiffres sont 
représentés sous forme de matrice de 

points et le joueur doit retrouver le sym- 
bole tiré au hasard par l'ordinateur. Il dis- 
pose pour cela d'un curseur qui peut 
indiquer si un point est présent ou ab- 
sent dans la matrice. Le tout étant de re- 
trouver le symbole le plus rapidement 



Labyrinthe est assez original : dans un 
tableau carré sont disposés des chiffres, 
vous devez partir du coin supérieur gau- 
che pour aller au coin inférieur droit en 
suivant certaines règles : par exemple 
trouver la somme la plus importante ou 
la plus petite. 

Enfin, Mémoire comme son nom l'indi- 
que, vous propose une série de symbo- 
les plus ou moins importante selon vos 
capacités. Les figures sont cachées au bout 
d'un certain temps et il faut alors les re- 
trouver. 

Edité par : Hatier 

Prix indicatif : Non communiqué 



Notre avis : 



Lq couple livre-disquette fonctionne 
tout-à-fait bien et même si le logiciel 
ne bénéficie pas de graphismes très 
élaborés, l'ensemble est tout de même 
très distrayant et donc très bien fait. 

OOOO d.U3o 



LE 



Logiciel du Mois 



DOMINATOR 



Arcade 




Le dernier pilote d'él 
c'est vous. Il ne vous 




époque passée qu'un 




Dominator. Bien su 
s'est installée aprè 
mais vous êtes tou 


s la grande guerre 
de même abattu en 










e. A vrai dire 


l'inaction vous pèse, d' 
société essaye plus ou m 
à l'écart le symbole des 

Mais un jour une terrible 


autant que la 
oins de mettre 
luttes ancien 

menace appa 




vertical tapissé de t. 



raît aux confins de votre système solaire : vous. en débarrassez facil 

un monstre spatial dévoreur de mondes passage devient de plus en plus . 

est en route vers la terre prêt à absorber ef il faut une agilité r-— 

la planète entière. Bien sûr en tant que ler ies crocs 1 ui sorte 

du boyau. Heureusement une grande 
pièce s'affiche bientôt. Au bout de celle- 
B"appioche. c * vous trouvez le gardien, sorte d'amas 
orange muni d'une bouche. Quelques 
: que coups de laser bien placés et vous voilà 

inlé- débarrassé de l'obstacle gênant, 1/ 

gralité, vous allez devoir entrer dans i 
corps afin de la détruire de l'intérie 

iposte va être terrible dégoulinent sur les parois. Dégoulin 

nismes qui fourmillent est bien le mot car de temps à aulr ~ 

ps sont tous d'un con- gouttelette d'un acide acide pi 

et peu aimable. Vous commencez vo- tombe(de préfé 
tre progression dans un long cou 
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laSumm 



W 



talliqu- 

ints ou des vies supplé 

...uvelles armes et même un «cheat 
mode». Dans cette partie vous : 
trerez également des animaux coi 
petits têtards et des abeilles dans le... 
ruche, II est parfois préférable de lais- 
plutôt qv 
e. Ainsi l'abeille 
géante qui vous nargue est assez rétin- 



verlicaux pour lui échapper sauf si' 



Notre avis : 



Qu'est-ce qu'il est difficile Dominator 
mais aussi qu'est-ce qu'il est beau : 
des graphismes détaillés, des couleurs 
pétantes, un grand nombre d'aliens et I 
malgré tout ça l'animation est rapide I 
(bien que légèrement saccadée). En- 
fin un jeu qui prouve que l'on peut faire 
des choses extraordinaires en 16 
couleurs. A côté la version Atari a l'air | 
pâlotte tant on est surpris par 
chesse des dessins du CPC. Un très | 
bon jeu d'arcade, peut-être même l'u 
des tout meilleurs. Bravo System 3 et | 
à la prochaine réussite. 
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■ -M*M*n , demain*» un Jeun» garçon A sa 




■■»e**»6»ourque i e»t-ce qu* Lf wlr je 




su ta trop p»tit pour- w* il 1er 




t&n<Sfc#mps »t Le matin trop grand 




peur c»ftt#r «u lit 




m nu 

tfiiunii^i^ii^M 





A J'jrriver»! i P»ru »r Le train 
de IShSO à la «are du Nord 

B Je. te remercie de ta lettre du 1S 



taurant de la sare 



J'irai au restaurant 
J'espère te retrouve 



rcnnnm m e œ tn □ 



Après avoir fait ses premières prouesses dans le domaine 
des maths avec Destination Maths, Génération 5 présente 
maintenant une nouvelle série consacrée au français. Bien en- 
tendu, ce logiciel n'est pas présenté de manière traditionnelle 
et nous vous invitons à découvrir tout le plaisir qu'il est pos- 
sible d'avoir en travaillant avec. 

La version que nous vous présentons s'adresse aux élèves de 
la 6ème à la 3ème. FI a pour but d'acquérir une meilleure maî- 
trise de la langue française en visant les quatre objectifs sui- 
vants : dominer les bases formelles de toute production écrite 
avec, notamment, une utilisation correcte de la ponctuation ; 
assurer au texte clarté et cohérence ; posséder un vocabulaire 
varié et, pour terminer, stimuler l'imagination et développer 
l'envie d'écrire. Concrètement, ces 4 objectifs ont les 4 saisons 
comme support, chacune servant de décor aux exercices de 
chaque type. Ainsi, nous partons à la recherche de la ponc- 
tuation perdue. Dirigé par Bernard Pivert, dont je vous laisse 
le soin de découvrir à qui il ressemble, vous avez à l'écran un 
texte sans ponctuation et sans majuscules. Le nombre de ma- 
juscules à replacer, ainsi que le nombre et le genre de signes 
de ponctuation, sont indiqués en bas de l'écran. Un sans-faute 
vous octroie 30 points tandis qu'à chaque erreur votre capital 
diminue de 10 points. Ce facteur de points apporte une moti- 
vation nécessaire ; en effet, lorsque vous totalisez 450 points, 
vous obtenez une plume d'or. De plus, lorsque vous en pos- 
séderez trois, vous aurez lé privilège de voir apparaître sur 
votre écran le génie du langage, lui aussi personnage très connu. 
A noter que ce génie du langage vous réserve une surprise 
très agréable... 



Lorsque nous atteignons l'été, nous sommes conviés à faire 
un festin avec des phrases en salade. Le principe est le sui- 
vant : un texte apparaît à l'écran, constitué de ses 5 premières 
phrases. Seulement, elles sont inscrites dans n'importe quel 
ordre ; à vous de les classer afin détendre le texte cohérent et 
logique. Ceci constitue un excellent exercice pour structurer 
sa pensée et éviter de donner une impression de confusion et 
de décousu. Même les plus grands pourront s'y essayer sans 
être forcément certains de gagner à tout coup car, pour tous 
les exercices, il existe 2 niveaux de difficulté : facile et plus 
compliqué... 

Quand revient le vent de l'automne, nous nous lançons dans 
la cueillette des mots. Il est vrai que notre langue française est 
tellement riche que pour un seul terme et suivant le contexte 
de la phrase, il existe une grande diversité de mots. Chaque 
exercice se déroule de la manière suivante : 5 phrases sont 
affichées successivement à l'écran, contenant toutes le même 
mot clé. A vous de choisir le bon synonyme dans la liste pré- 
sente à l'écran. Ces exercices représentent un moyen très effi- 
cace pour enrichir le vocabulaire. 

Pour terminer, les longues soirées sont propices à la songerie 
et à la prose. Mais comme l'inspiration tarde peut-être à venir 
quelquefois, les 4 saisons de l'écrit dispose de 30 textes de dif- 
ficulté croissante et de genres variables. Après vous être im- 
prégné du début du texte, il ne vous reste plus qu'à le prolon- 
ger selon votre bon vouloir. Pour cela. Génération 5 a pensé à 
intégrer au logiciel un traitement simple mais bien conçu. Cette 
possibilité a de plus l'avantage d'offrir aux élèves une bonne 
initiation à un outil qu'ils auront de plus en plus l'occasion 
d'utiliser. Les fonctions de ce traitement de texte sont les sui- 
vantes : frappe au «kilomètre», insertion et ef façage, déplace- 
ment rapide, retour paragraphe, ajout et suppression de li- 
gnes, sauvegarde, impression. De plus, pour avoir une utili- 
sation agréable de cet outil de travail, vous avez la possibilité 
de choisir vos couleurs de fond et d'écriture. 
Bien entendu, comme il est évident que l'élève ne pourra pas 
réaliser le score nécessaire à l'apparition du génie du langage 
en une seule fois, il est possible de sauvegarder une «partie» 
en cours et de la continuer ainsi à tout instant. 

Edité par ; GENERATION 5 
Prix indicatif : DK, 225F 



Une fois de plus, nous tombons sous le charme. L'intérêt 
de ce logiciel est évident quant à sa qualité pédagogique ; 
en effet, il est plaisant de se former selon une méthode 
agréable et originale. De plus, tous les aspects qui consti- 
tuent un logiciel sont particulièrement étudiés, ce qui nous 
donne de beaux graphismes et une musique, les Quatre 
Saisons de Vivaldi bien sûr , de qualité. 
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Bien qu'il n'ait pas été nécessaire de corriger notre petit 
programme, il faut que je vous donne quelques armes pour 
cette bataille que représente la mise au point. On considère 
d'habitude que, si l'analyse a été bien conduite, l'écriture 
du programme représente de 5 à 15 % du temps total de 
programmation; la durée de la mise au point est très variable, 
mais il n'est pas rare qu'on y consacre bien plus de temps 

qu'à la 
program- 
mation, 
surtout si 



STRATEGIE 

ET TACTIQUE DE 

LA MISE AU POINT 

Ici je ne peux pas vous proposer 
une méthode à suivre pas à pas, car 
Il n'y en a pas à proprement parler. 
Tout ce que Je peux faire c'est, à par- 
tir de ma propre expérience et de 
celle des auteurs, vous Indiquer les prin- 
cipaux plèges,vous préciser les bon- 
nes habitudes à prendre, la marche 
à suivre en cas de bizarreries dans les 
résultats ou de blocage sans message 
d'erreur, en cas de message d'erreur 
du BASIC et enfin vous apprendre à 
utiliser quelques astuces et outils d'aide 
à la mise au point. 



LE BANC D'ESSAI 

Les sous-programmes étant écrits 
en BASIC du bas vers le haut, il est lo- 
gique de tester d'abord tous les mo- 
dules correspondants au niveau le plus 
bas. Une fois leur bon fonctionnement 
vérifié. Ils pourront servir à contrôler les 
modules du niveau au-dessus dès que 
ceux-ci seront écrits, et ainsi de suite. 
Pour ce banc d'essai. Il faut construire 
au coup par coup de petits program- 
mes outils, chargés ; 

- de fournir au module testé les don- 
nées nécessaires (c'est-à-dire les va- 
leurs des variables. OK ?), en les affi- 
chant toutes à l'écran avant de lan- 
cer le module ; 

- de récupérer les résultats fournis par 
ce module, c'est-à-dire les valeurs des 
variables (de travail et/ou de sortie) 
qu'il passe à la suite du programme, 
et de les afficher également. 

Bien entendu, cet affichage con- 
cernera à la fois les noms des varia- 
bles et leurs valeurs. Nous contrôlerons 
ainsi, sur un module de dimensions limi- 
tées, donc relativement facile à exa- 
miner, s' Il y a : 

- des erreurs de syntaxe, autrement 
dit d'écriture (message d'erreur), 

- des erreurs dans les résultats fournis, 
dues soit à des erreurs d'écriture, soit 
à des erreurs de conception, avec ou 
la plupart du temps sans message 
d'erreur. 



Comment s'apercevoir que les ré- 
sultats fournis sont erronés ? Difficile à 
dire, c'est un problème qui se résout 
au cas par cas. Souvent, le simple bon 
sens, appuyé sur la connaissance de 
ce qu'on désire obtenir, suffit à sépa- 
rer le vrai du faux, ou tout au moins le 
vraisemblable de l'absurde. Cela ne 
suffit pas toujours. Dans certains mo- 
dules dont ceux de calcul, à moins 
d'être très doué en maths, le vrai, en- 
core plus que le vraisemblable, est dif- 
ficile à cerner. Je livre Ici à vos réflexions 
deux procédés utilisés parfois par les 
prosen pareil cas : 

• Si plusieurs algorithmes sont possibles 
pour fournir les mêmes résultats, pro- 
grammer à part un de ceux qui n'ont 
pas été retenus, traiter en parallèle le 
même exemple sur les 2 algorithmes, 
et comparer les résultats qui doivent 
être identiques si tout s'est bien pas- 
sé. Qu'est-ce qu'un algorithme ? Tout 
simplement la suite d'opérations élé- 
mentaires, pouvant contenir des test 
et/ou des boucles, qui assure le traite- 
ment d'une ou plusieurs entrées pour 
fournir le ou les résultats attendus. En 
maths, un algorithme de calcul peut 
s'exprimer sous forme d'une formule 
qui représente la sé'quence d'opéra- 
tions nécessaires. Exemple : la formule 
de résolution des équations du second 
degré à une Inconnue exprime sous 
forme condensée le traitement à ap- 
pliquer aux entrées a et b (faisant par- 
tie de l'équation x2+ax+b=0) pour 
obtenir les 2 valeurs de x. 

• SI onadu temps et du courage, on 
peut effectuer à la main (avec une 
calculette, quand même) les calculs 
correspondant à l'algorithme choisi, 
et comparer les résultats. 

Les deux méthodes (surtout la se- 
conde) peuvent également s'appli- 
quer à des traitements portant sur des 
chaînes de caractères . 

Dans le banc d'essai. Il faudra veil- 
ler, notamment si on teste plusieurs mo- 
dules avec appels en cascade, à vé- 
rifier toutes les conditions, tous les cas 
particuliers possibles, autrement dit à 
passer au moins une fois dans cha- 
que branche de l'organigramme 
(donc dans toutes les parties du pro- 
gramme). Sinon, on ne peut être sur 



qu'un groupe d'Instructions non tes- 
té ne contient pas une erreur. 

En plus de l'affichage des varia- 
bles d'entrée et de sortie, par les bons 
soins des programmes outils, il pourra 
être utile, surtout si des erreurs ont été 
décelées dans un premier essai, de 
prévoir une exécution du module ou 
du groupe de modules en plusieurs 
étapes, en insérant provisoirement des 
pauses (STOP) et des PRINT adéquats 
avant ces pauses (pas forcément li- 
gne par ligne, mais aux endroits stra- 
tégiques). On obtient ainsi une sorte 
d'exécution pas à pas comme celle 
qu'on utilise pour la mise au point des 
programmes en Assembleur. Par PRINT, 
on demandera selon le cas l'affi- 
chage : 

- des noms de variables de travail (ne 
sortant pas du module) et de leurs 
valeurs, 

- des résultats des calculs Intermédiai- 
res, 

- des éléments éventuellement écrits 
dans un fichier ASCII (en demandant 
par la suite la lecture du fichier, on 
peutobserverdesdlfférences,si,sl I), 

- des variables de contrôle (ou comp- 
teurs) des boucles FOR...NEXT, ainsi que 
des valeurs permettant éventuelle- 
ment de sortir de la boucle avant la 
fin. J'expliquerai plus loin ces notions 
relatives aux boucles, notions très im- 
portantes et pas toujours clairement 
définies. 

Immédiatement après ces PRINT, 
la pause peut s'obtenir au moyen de 
2 instructions : 

- STOP, le programme s'arrête sur un 
BREAK et on repart en tapant CONT 
(si on n'a pas modifié le programme 
avant de redémarrer), comme si on 
avait appuyé 2 fols sur ESC ; 

- CALL &BB06. on repart en appuyant 
sur une touche quelconque , comme 
si on avait appuyé 1 fols sur ESC. 
Les PRINT, STOP, CALL &BB06 seront ef- 
facés une fols le programme au point. 
Pour les repérer plus facilement, on 
peut les mettre dans des lignes se ter- 
minant par 1 et non par (101 , 231 , 
591, etc.). 

Bien entendu, ces différents ren- 
seignements très utiles peuvent aussi 
être demandés par PRINT en mode 
direct, à la suite d'un BREAK du sys- 
tème consécutif à une erreur. Mais là 



on ne peut pas repartir par CONT (seu- 
lement par un GOTO N° de ligne qui 
conserve les variables en mémoire 
contrairement au RUN N° de ligne). 
Attention, en cas de BREAK suite à une 
erreur, la ligne où est détectée l'er- 
reur est parfois éditée pour correction 
éventuelle. Dans ce cas. tapez 
d'abord ENTER pour sortir de l'éditeur 
BASIC avant de demander les rensei- 
gnements par PRINT. 

Je rappelle que, par mode direct, 
on entend les Instructions BASIC tapées 
sans numéro de ligne, lorsqu'on a la 
main, et par mode programme les Ins- 
tructions contenues dans les lignes du 
programme. 



Dans tous les cas. les traitements 
présents dans le sous-programme visé 
par ON ERRORGOTOsont spécifiques 
et renvoient à des lignes précises, par 
RESUME N 11 de ligne ; Il faut donc avoir 
bien réfléchi à tous les cas à traiter. 

Et s'il se présente des erreurs non 
prévues ? Le sous-programme de trai- 
tement d'erreurs passera les différents 
tests, et enchaînera sur le sous-pro- 
gramme suivant, ou s'il n'y en a pas 
aboutira à la fin du programme, avec 
ou sans message d'erreur selon ce qu'il 
rencontrera à ce moment-là. Plutôt 
gênant, non? 

Prenons un exemple. 



10 OS ZREOF GOTO 100 

20 GOSUS 80: GOTO 50 

30 IKPUT "Entrez un mot ";a$ 

40 OPEXOUT "toîo":WEITE *9 ,aS:CLGSEOUT 

bO FOU i=0 to LES(aS):b$=MIDSIa$,i,l):PRIET bS:XEXT i 

60 GOTO 30 

70 • 

80 OPESIS "toto":IKPUf *9,aS:CL0SElN:P.ETURS' 



.'-.';:: r,T&-- i-:6 rSiV.' i;££i;;«r ■!'■ 



ATTENTION PIEGES ! 



istruction ON ERROR GOTO 



Elle est utilisée par les auteurs qui 
font leur possible pour éviter aux utili- 
sateurs maladroits ou distraits de cruel- 
les déconvenues. 

Principaux emplois ; 



- détourner à la source les manipula- 
tions ou entrées erronées, en ajoutant 
éventuellement des messages d'er- 
reurs inédits (par l'instruction ERROR) 
; on peut parvenir au même résultat 
par un filtrage soigneux des entrées 
au moyen de tests, avec messages 
d'erreurs originaux ou BIP si on le dé- 
sire ; 

- dans les cas où un programme doit 
lire un fichier ; elle évite le plantage 
définitif dû à l'absence du fichier, en 
permettant, soit au programme de 
créer ce fichier, soit à l'utilisateur d'In- 
sérer la disquette ad hoc (utilisation 
la plus courante) ; 

- test pour orienter la suite du pro- 
gramme : c'est la généralisation du 
cas précédent à d'autres typesd'er- 
reurs. 



Exécutons le programme : nous ob- 
tenons le message «Résume missing 
In 100». Ajoutons une ligne 110 : 

110 PRINT «C'est fini U 

Cette fols, l'ordinateur nous dé- 
clare «Résume missing in 11 0» ; l'Inter- 
préteur BASIC va jusqu'au bout du pro- 
gramme et ne trouve pas le RESUME 
qu'il espère. 

Et si nous mettions un END à la fin 
(facultatif, rappelons-le) ? 

110PRINT «C'est fini I «:END 

Là, nous obtenons un READY sans 
message d'erreur I Etonnant, non ? 
Mais notre problème n'est pas réso- 
lu. Il faut pouvoir sortir du sous-pro- 
gramme de traitement d'erreurs en 
cas d'erreur non traitée ; par excès 
de précaution, on peut être tenté 
d'ajouter à la fin de ce sous-program- 
me un RESUME sans N° de ligne : 

110 RESUME 



Voilà un piège superbe si vous 
ajoutez un tel module à votre pro- 
gramme avant que tout ait été mis 
au point. Vous n'aurez aucun messa- 
ge d'erreur mais une boucle infinie et 
vous vous demanderez ce qui peut 
bien causer ce blocage. Vous n'au- 
rez que la ressource de tout arrêter 
en appuyant deux fols sur ESC, si vous 
n'êtes pas en plus tombé dans le 
piège suivant. Que faire de mieux ? 
Difficile d'indiquer un N° de ligne après 
RESUME puisque par définition II s'agit 
d'erreurs imprévues, aléatoires. 

Un RESUME NEXT éviterait bien le 
blocage dans une boucle Infinie, es- 
sayons: 

110 RESUME NEXT 

Surprise, tout se déroule correcte- 
ment, C'est que dans l'instruction 
FOR... NEXT de la ligne 50.seule la pre- 
mière itération provoque une erreur 
(l'argument «position de départ» doit 
être supérieur à 0), et que le RESUME 
NEXT renvoie non pas à la ligne sui- 
vant celle qui comporte une erreur 
(comme le prétend le manuel), mais 
simplement à l'Instruction suivant celle 
qui est erronée ; donc, dans ce cas 
particulier, à l' Itération suivante de la 
boucle (NEXT I), où cette fois l'argu- 
ment est correct. 

Pour en avoir le cœur net, chan- 
geons la ligne 60 

50 PRINT aS:PRINTUPPERS(aS) 

C'est bien l'Instruction suivante qui 
est exécutée mais notre problème 
n'est toujours pas résolu car l'erreur 
est sautée sans être signalée. 

La seule chose sensée à faire est 
de terminer le sous-programme de trai- 
tement d'erreur par l'instruction ON 
ERROR GOTO qui rétablit le traite- 
ment normal par l'Interpréteur BASIC : 

110 ON ERROR GOTO 

Si le fichier «toto» est absent, le mo- 
dule de traitement d'erreurs fera son 
boulot, puis le programme tombera 
sur la ligne 50 et affichera !e message 
«Improper argument in 50» dans le cas 
de la première version de cette ligne, 
ou «Syntax error in 50» avec édition 
de la ligne pour correction dans le cas 
de la seconde. 



NOTA. Les erreurs détournées sur 
le module de traitement ne donnent 
pas de messages d'erreurs à l'écran, 
au moins en ce qui concerne ERR 1 
à ERR 30. Je n'ai pas testé toutes les 
erreurs de disquettes, mais DERR 146, 
même détournée sur ledit module 
affiche quand même son message 
«<flchier> not found». Il est probable 
qu'il en soit de môme pour les autres 
erreurs de disquettes, DERR 1 42 à DERR 
154. 

H—an— 

Elle est utile lorsque l'auteur sou- 
haite éviter à l'utilisateur d'arrêter le 
programme par mégarde (si une tou- 
che voisine de ESC doit être fréquem- 
ment utilisée). Comme le BREAK est 
très souvent employé au cours de la 
mise au point. Il ne faudra ajouter cette 
Instruction que lorsque vous aurez tout 
peaufiné (Idem pour ON BREAK GO- 
SUB). 

Notez bien que ON BREAK CONT 
n'empêche quand même pas le 
BREAK consécutif à une erreur (avec 
message). 



Il est très facile de les écrire de fa- 
çon Incorrecte, voire même à l'envers, 
surtout s'il y en a plusieurs à la suite 
ou s'ils utilisent les opérateurs logiques 
AND ou OR. Le résultat ne sera pas 
celui que vous attendiez et sans mes- 
sage d'erreur vous aurez bien du mal 
â comprendre où se trouve la gaffe. 

Exemple. Dans l'entrée d'une 
chaîne caractère par caractère 
(donc autrement que par INPUT), nous 
voulons limiter les caractères valides 
aux lettres de l'alphabet en majuscu- 
les (codes ASCII 65 à 90) en émettant 
un BIP pour toutes les tentatives d'en- 
trée d'un autre caractère ; c'est un 
exemple que j'ai appelé le filtrage des 
entrées. 

MAUVAIS 

100 aS=.»:WHILE aS="':aS=INKEYS: 

WEND:a=ASC(aS) 

110 IFa>64 ORa<91 THEN 120ELSE 

PRINTCHRS(7);GOTO100 

120 " Suite du programme 



BON 

110 IFa<65ORa>90THEN PRINT CHRS 

(7): GOTO 100 

BON 

110 IFa>64 0Ra<91 THEN 120 ELSE 

PR!NTCHRS(7):GOTO100 

Même principe mais en validant 
toutes les lettres de l'alphabet, ma- 
juscules et minuscules (code ASCII 65 
à90et97à 122). 
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MAUVAIS 

1 10 IF a<65 OR a>90 OR a<97 OR 
a >1 22 THEN PRINTCHRS (7):GOTO 100 
MAUVAIS 

110 IFa>64ANDa<123ANDa<91 OR 
a>96 THEN 120 ELSE PRINT CHRS(7): 
GOTO 100 

BON 

110 IF a<65 OR a>90 AND a<97 OR 

a>122THEN PRINT CHRS(7):GOTO 100 

BON 

110 IFa>64 ANDa<123AND(a<91 

OR a>96) THEN 120 ELSE PRINT 

CHRS(7);GOTO100 

BON 

110 IF a<65 OR a>90 THEN IF a< 97 

OR a>122 THEN PRINT CHRS(7):GOTO 

100 

Autre piège : si la condition est rem- 
plie (= vraie), toutes les instructions 
situées après THEN (jusqu'au ELSE ou 
jusqu'à la fin de la ligne s'il n'y a pas 
de ELSE) seront exécutées. Si la con- 
dition n'est pas remplie (= fausse), tou- 
tes les instructions situées après ELSE 
et Jusqu'à la fin de la ligne seront exé- 
cutées; cela s'il y a un ELSE, sinon ce 
sont les Instructions des lignes suivan- 



tes qui seront exécutées, vous le sa- 
vez certainement. Ne faites surtout 
pas l'erreur de rajouter à la fin de la 
ligne des Instructions qui doivent être 
exécutées dans tous les cas (que la 
condition soit vraie ou fausse), histoire 
de mieux remplir la ligne comme on 
vous l'a peut-être enseigné dans le 
but d'accélérer l'exécution du pro- 
gramme. C'est une source très cou- 
rante de tracas et bien sûr sans mes- 
sage d'erreur. Cela paraît évident, 
mais II arrive souvent que l'on se fasse 
«avoir» dans le feu de l'action. 

Moralité, Il faut être très vigilant 
dans l'écriture des tests ; c'est là que 
le dessin d'un organigramme (même 
si c'est contraignant) peut s'avérer très 
utile et même indispensable pour le 
débutant. Cela permet d'effectuer fa- 
cllementle testa la main et d'en com- 
parer le résultat à l'exécution du pro- 
gramme. 



Là aussi II est très possible de les 
écrire de manière Incorrecte : une 
boucle dont le début est supérieur à 
la fin, mais où on a oublié de préciser 
un STEP négatif ne sera pas exécutée : 
le programme sautera immédiate- 
ment à la suite, sans message d'er- 
reur. 

Autres pièges possibles, les valeurs 
données au début et/ou à la fin de la 
boucle peuvent être incorrectes eu 
égard au résultat escompté (la bou- 
cle commence ou finit trop tôt ou trop 
tard) ; c'est surtout le cas lorsque ces 
valeurs sont non pas écrites dans le 
programme mais fournies par des va- 
riables Insuffisamment contrôlées. 

Dans les boucles Imbriquées. Il est 
assez fréquent que la variable de con- 
trôle d'une boucle externe, ou des pa- 
ramètres fournis par elle, serve de va- 
leur de début ou de fin dans une bou- 
cle Interne. En cas de résultats non 
conformes aux attentes. Il faut tout 
passer au peigne fin pendant de lon- 
gues heures avant de trouver où le 
bât blesse. Là. le dessin d'un organi- 
gramme ou d'un schéma clair et l'exé- 
cution patiente â la main sont vrai- 
ment lnà'6>pensables, et pas seulement 
au débutant. 



Je cite pour mémoire les NEXT man- 
quante ou en surnombre, ou bien dans 
le désordre. Ce genre de bourde est 
facile à corriger car elle produit des 



NOTA. Bien que le NEXT ait parfai- 
tement le droit d'être anonyme, car 
le système sait fort bien le relier au FOR 
correspondant, on conseille généra- 
lement d'y associer le nom de la va- 
riable de contrôle afin que le program- 
me soit plus lisible, notamment lorsque 
les NEXT d'une série de boucles Imbri- 
quées se retrouventsur la même ligne I 

Dans ce cas, je vous recommande 
le principe de la «plie d'assiettes» : der- 
nier entré, premier sorti. Autrement dit, 
les noms des variables de contrôle 
doivent être associés aux NEXT dans 
l'ordre inverse de leur affectation aux 
FOR. 

FOR a=l TO 10 boucle 1 

NEXT a 

FOR b=2 TO 5 boucle 2 

NEXTb 

FOR c-10 TO 20 boucle 3— NEXT c 

Voilà le genre de schéma vite fait qui 
peut rendre de grands services. 

Ces quelques mises en garde con- 
cernant les tests, les opérateurs logi- 
ques et les boucles auront peut-être 
plongé dans la perplexité ceux d'en- 
tre vous qui commencent juste à les 
utiliser. J'y reviendrai dans un prochain 
article. 



Cela vous surprend que le fait de 
corriger une erreur vous expose à tom- 
ber dans un piège ? Alors penchons- 
nous sur les deux types de pièges qui 
vous tendent leurs mâchoires. 



10 SSILE AOZS6 

20 BEAD AS, A 

30 IE A=73 THES READ B$ 

40 PRIST CER$(A); 

50 l/ESD 

€0 DATA A,85,B,es,C,67,D,68,E,Sl 

70 DATA J,74,K,7S,£,76,M,77,FIS, 

80 ESD 



Vous avez identifié ce qui vous pa- 
raît être la gaffe, quelle ait donné lieu 
ou non à l'affichage d'un message 
d'erreur. Tout excité par une telle clair- 
voyance, vous vous empressé de pro- 
céder aux corrections qui semblent 
s'imposer et vous relancez la partie 
de programme qui cette fols doit ré- 
pondre à vos espoirs. Pas de chance, 
ça ne marche toujours pas. Qu'il y ait 
cette fols un message d'erreur ou non 
vous partez du principe que l'erreur 
Initiale n'existe plus puisqu'elle a été 
corrigée et vous cherchez ailleurs. 

SI l'erreur était bien présente là où 
elle a été détectée (par l'interpréteur 
BASIC ou par vous-même). Il se peut 
fort bien que dans une correction hâ- 
tive vous ayez introduit une autre er- 
reur dont l'effet ne se fera sentir qu'en 
aval du programme. En général II faut 
être prudent dans la correction : s'as- 
surer que l'erreur ne provient pas d'un 
défaut de contrôle des entrées et vé- 
rifier lo correction afin d'éviter une er- 
reur supplémentaire. Si cela arrive, ne 
pas hésiter à revenir à la version an- 
térieure du programme : dans sa gran- 
de prévoyance le BASIC conserve tou- 
jours l'avant-dernière version (avec 
l'extension .BAK) qu'il suffit de renom- 
mer en .BAS ou de charger par un 
LOAD puis de sauvegarder par SAVE. 
Mais la manière la plus logique de 
procéder consiste à ne sauvegarder 
la version modifiée que lorsque vous 
êtes sûr que la dernière erreur détec- 
tée est vraiment corrigée, sans effets 
secondaires indési-rables. 

Le gag le plus vicieux, d'autant plus 
qu'on éprouve une confiante grati- 
tude envers les messages d'erreurs qui 
ont l'amabilité de nous signaler la li- 
gne fautive, c'est que ta ligne en ques- 
tion est seulement celle où l'erreur a 
été détectée ; et rien ne prouve que 
l'origine de l'erreur ne se trouve pas 
bien avant dans le programme ! 

Le meilleur exemple de ce genre 
de désagrément est celui signalé par 
Maurice Thlon dans la rubrique «Trucs 
et astuces» de CPC N° 30. Pour ceux 
qui ne disposeraient pas de ce numé- 
ro, voici l'exemple : 



,F,7C,G,71,B, -'2,1, 73 



Exécution du programme ; Syntax 
Error In 70 alors que la ligne 70 ne com- 
porte pas la moindre erreur. 
Explication : l'erreur est en fait en li- 
gne 30, le but du programme est d'af- 
ficher la lettre de l'alphabet corres- 
pondant à la valeur des DATA numé- 
riques. Le programme lit en 20 les DATA 
2 par 2. Le premier est alphanuméri- 
que (AS), le second numérique (A). 
Mais en ligne 30, lorsque la valeur de 
Aest73.il est demandé de lire BS, une 
donnée alphanumérique. Le carac- 
tère J est lu ; en ligne 40, affichage du 
CHRS(73) soit I, retour en 1 pour com- 
parer 73 et 255 ; fin du programme ? 
Non. Lecture en 20 des 2 données sui- 
vantes AS et A. qui sont respective- 
ment 74 et K, puisque le pointeur de 
DATA (chargé d'enregistrer le dernier 
DATA employé) pointait le J , Le systè- 
me détecte alors une erreur et affi- 
che le message correspondant (à vrai 
dire, on se serait plutôt attendu à Type 
Mismatch qu'à Syntax Error). 

Vérification ; après le BREAK, ap- 
puyez sur ENTER pour sortir de l'édi- 
teur et tapez en mode direct PRINT 
AS A ; vous obtenez les valeurs 74 et 
: 74 peut être considéré comme une 
valeur alphanumérique, mais en au- 
cune façon K ne peut passer pour une 
valeur numérique, C.Q.F.D. 

Moralité, en cas d'erreur, même 
s'il y a un message explicite, surtout 
ne pas se précipiter sur le clavier pour 
corriger à la hâte mais bien réfléchir, 
en se reportant si nécessaire aux no- 
tes prises au cours de l'analyse et à 
l'organigramme si on en a dessiné un. 
D'où l'intérêt de conserver tout le tra- 
vail effectué, même après la mise au 
point si des problèmes de maintenan- 
ce sont à envisager. En langage pro, 
on appelle ça constituer un dossier de 
programmation ; sans aller aussi loin, 
prenez donc une chemise où vous ran- 
gerez toutes vos notes concernant 
l'analyse, les organigrammes éven- 
tuels, le ou les listings et le dictionnaire 
des variables dont Je vous reparlerai 
bientôt. SI vos brouillons sont trop con- 
fus, recopiez-les, ça ne sera pas du 
romps perdu. 
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CAO SUR CPC 



PREMIERE MISE EN ŒUVRE 

DE L'ALGORITHME DU PEINTRE 

DANS LA SECTION VOIR 



Dans les leçons 

précédentes nous avons 

présenté les différents 

algorithmes que nous 

nous proposions 
d'utiliser, en particulier 

dans la 21ème leçon. 

Dans les leçons 22 et 23 

nous avons doté notre 

chaîne de traitement des 

premières routines 

d'engendrement 

d'images «fil de fer». 

Dans la leçon 24 nous 

avons construit 

l'algorithme 

d'élimination des 

facettes non vues dans 

les polyèdres convexes, 

avec ou sans arêtes 

virtuelles. 




Aujourd'hui nous allons atta- 
quer le problème central, lié 
à l'algorithme du peintre. Les 
objets, selon notre approche, sont 
classés en quatre types distincts. 

- Les objets fil de 1er, cachables et non 
cachants. 

- Les graffitis plans , cachables, non 
cachants, mais qui obéissent aux mê- 
mes lois d'exclusion que les facettes 
orientées (Intérieur— >extérieur). 

- Les solides, polyèdres convexes, avec 
ou sans arêtes virtuelles. Faits d'élé- 
ments à la fols cachables et cachants, 
constitués de facettes orientées (In- 
térieur— >extérieur). Les facettes non 



vues sont directement éllminables en 
détectant l'orientation de leur vec- 
teur normal vis-à-vis de l'observateur. 

- Les coques, faites également de fa- 
cettes, avec ou sans arêtes virtuelles. 
Celles -ci ne sont plus orientables (in- 
térieur— >extérieur). Les coques sont 
cachables, cachantes et auto-ca- 
chantes. Ce sont des polyèdres quel- 
conques, éventuellement troués. 

Sur la disquette SUPERAMSTRAD-3D 
mettons en évidence les différents ty- 
pes d'objets. Le bloc SPHERE est un 
ensemble de solides. Ceux qui pos- 
sèdent la disquette pourront obtenir 
l'Image ci-après en choisissant les pa- 
ramètres de vision suivants : 



Observateur en (5, 5, 3) 
Point visé (0. 0, C) 
Ouverture angulaire : 20 





Figure 1 : Décor constitué de solides 
(bloc sphère). 

Les graffitis sont bien visibles sur 
cette image du bloc MAMAISON, 
obtenue avec les coordonnées ci- 
après : 

Observateur en (30, 15,15) 
point visé en (10, 7,2) 
Ouverture angulaire : 20. 

Ces graffitis sont les fenêtres des- 
sinées sur les murs. Dans ce décor on 
a un objet fil de fer : la treille qui est 
au-dessus de la ter 



Figure 3 : Décor 

Le recours à la structure de type 
coque est indispensable lorsque l'ob- 
jet présente des concavités. Tel est 
l'objet CROSSCAP, présent sur la dis- 
quette objet de SUPERAMSTRAD-3D. 
Avec les paramètres de visée : 

Observateur en (3, 7, 4) 
Point visé en (0,0,0) 
Ouverture angulaire : 20 




Figure 2 : Décor montrant 

des graffitis (fenêtres) et des objets 

fit de fer (treille). 

Sur la disquette objet de SUPER- 
AMSTRAD-3D on a également un bloc 
HLM. Si on utilise les paramètres de 
visée suivants : 

Observateur en (- 4 . - 0.2 , 0.2) 
Point visé en (5. 2,1) 
Ouverture angulaire : 20 

On obtient l'Image de la coque 
GRANGE, qui est une coque trouée, 
autocachante. On distingue l'objet du 
bloc qui est situé sur l'arrlère-plan. Il 
s'agit d'un solide, partiellement rayé 
par un objet fil de fer qui est censé 
représenter les montants de la fenê- 
tre visible au fond. 



Figure 4 : Polyèdre présentant 
des concavités, donc autocachant. 



On obtient la figure A et on voit bien 
que l'objet est autocachant. 

Au bout du compte nous aurons 
plutôt tendance à traiter des blocs 
d'objets, qui permettent des combi- 
naisons plus riches et non des objets 
Isolés. Dans la présente leçon nous 
commencerons par mettre en œuvre 
l'algorithme du peintre s'appllquant 
à un objet unique, intégré à la sec- 
tion VOIR. 

Le fonctionnement de cet algo- 
rithme découle d'une Idée intuitive ex- 
trêmement simple. Le décor étant dé- 
composé en éléments, on effectue 
un classement de ces éléments en 
fonction de leur distance «à vol d'oi- 
seau» vls-â-vis de l'observateur. Ceci 
étant fait, l'ordinateur dessine ces élé- 
ments les uns après les autres en bar- 



bouillant l'Intérieur des facettes d'une 
«peinture» identique à celle du «fond». 
Ce faisant on efface automatique- 
ment toute trace des éléments situés 
à l'arrière-plan, 

C'est parfait pour une production 
d'image sur un écran, mais totalement 
impratiquable pour une sortie sur table 
traçante. Pour pouvoir être adaptée 
à cet algorithme du peintre, ladite 
table devrait être munie d'une super- 
gomme. Les dessins sur table traçante 
sont effectués de manière totalement 
différente. Ils nécessitent un mode de 
traitement dit «Interaction face-arète». 
Les objets doivent avoir une structure 
de données s'y prêtant, Bien sûr, on 
a fait en sorte que la structure de SU- 
PERAMSTRAD-3D corresponde à ce cri- 
tère. Mais comme l'Amstrad n'est pas 
en général doté d'une table traçante 
j'ai jugé inutile d'adapter cet algo- 
rithme sur ce type de machine. 

Il existe déjà un certain nombre de 
logiciels produisant des images 3D 
avec parties cachées éliminées. Tour- 
nant sur des systèmes plus importants, 
ils sont peut-être plus rapides et peu- 
vent gérer des objets plus riches, mais 
si vous les observez attentivement ils 
sont souvent loin d'avoir la souplesse 
de celui-ci. Certains ne permettent pas 
d'ouvrir des fenêtres dans des murs, 
d'autres ne sont pas dotés du système 
des arêtes virtuelles. Enfin certains ne 
donnent que des images écrans, re- 
productibles par hardcopy, tout sim- 
plement parce que les programmeurs 
n'ont pas conçu la structure de don- 
nées en fonction de cette Interaction 
face-arète (qui, il est vrai, n'est pas 
simple-simple...). 

Mais regardons comment «tra- 
vaille» l'algorithme du peintre. Les Ima- 
ges 5a à 5d montrent comment se 
constitue, étape par étape, l'Image 
de la figure 2. Les éléments de l'ar- 
rière-plan sont d'abord dessinés (figure 
5a). Puis l'Amstrad s'occupe d'un ob- 
jet qui est un solide. Il élimine donc les 
facettes qui sont non vues, puis «peint» 
celles qui sont vues. Voir figure 5b. Le 
manque dans l'arête en premier plan 
n'est pas un bug, mais signale la pré- 
sence d'une arête virtuelle. 

Dans les Images 5c et 5d de nou- 
veaux avant-plans sont Installés et 
«peints», le résultat final étant l'image 
de la figure 2. 



'6^ 





ainsi effectué par un mouvement en 
éventail, le segment effectuant une 
rotation de 360°. 



Centre de gravité de la facette 



Figures Sa à Sd : Mise en œuvre 
de l'algorithme dupeintre. 

Pour ceux qui ont déjà la disquette , 
ce type de tracé >en cours d'exécu- 
tion» s'obtiendra en rajoutant à SU- 
PERDES la ligne ; 

36195 IF INKEYS = « « THEN CALL 
&AO00 : PRINT #8:PRINT #8 

qui signifie ; «SI la dernière touche 
pressée est la barre alors effectuer la 
recopie d'écran et Imprimer deux li- 
gnes vides sur le papier». 

Il y a de multiples façons de «pein- 
dre» une facette. Celle que nous uti- 
liserons consistera à tracer des seg- 
ments partant d'un point situé au cen- 
tre de gravité de celle-ci, l'autre ex- 
trémité étant située en un point d'un 
segment du contour polygonal. L'ef- 
façage de l'intérieur de la facette est 




Coupsde "pinceau" 

Figure 6 : «Peinture" d'u 



facette. 



Ceci soulève deux problèmes. En 
opérant ainsi nous allons du môme 
coup effacer le contour matérialisant 
la facette. La solution consistera à le 
tracer une seconde fois. Le deuxième 
problème est le pas angulaire de t'ef- 
façage. Si le pas est très fin, l'effaçage 
sera parfait, mais cela prendra beau- 
coup de temps. Si le pas est trop grand 
le tracé de l'arrière-plan subsistera «en 
pointillé». Mais on pourra utiliser ceci 
systématiquement : 



Figure 7 ; Effet de transparence. 

Sur la disquette objet de SUPER- 
AMSTRAD ceci correspond à l'objet 
MOEBIUS, avec les paramètres de 
vision : 

Position de l'observateur : (5, 4, 3) 
Point visé :<0, 0,0) 
Ouverture angulaire : 20. 

Pouf introduire cet effet de poin- 
tillé , !e possesseur de la disquette devra 
modifier SUPERDES en y faisant : 

36130 Nbarres = ABS (Refacette/6) : 
IF Refacette > 200 THEN Nbarres = 
Nbarres " 2 

La signification de cette suite d'ins- 
tructions sera donnée plus ioln. 



CONCRETISATION DE 

L'ALGORITHME DANS 

LA SECTION VOIR 

Avant de décrire ces sous-pro- 
grammes enrichissant la section VOIR 
nous suggérons au lecteur d'utiliser la 
section MOD1 pour créer un objet ad 
hoc, qui nous permettra a' ittustrei notre 
propos, Cette création d'objet cor- 
respond à : 

RUN-MOD1 

a-Créer un objet 

a-Chaîne par chaîne 

c-Coque 

a- Saisie clavier 

Nombre de segments ? etc. 

L'objet CROSSCAP correspond aux 
facettes décrites dans le tableau de 
points en fin d'articles. 
Stocker cet objet selon ta procédure : 
d- Stocker un objet 
Nom de l'objet ? CROSSCAP 
Type de l'objet: 
c-Coque 

Ce nom n' est pas choisi au hasard. 
Cet objet est la représentation poly- 
édrique la plus simple de la célèbre 
MITRE, chère au psychanalyste Jac- 
ques Lacan. Les Anglais l'appellent 
CROSSCAP (bonnet croisé). C'est une 
surface unflaîère, à un seul côté. 
Voyons maintenant comment nous al- 
lons agencer notre programme, 
■Notre programme VOIR aura ici sa for- 
me définitive, telle qu'elle est présen- 
te sur la disquette SUPERAMSTRAD-3D. 
Le traitementde l'objet sera opéré en 
deux temps, Dans un premier temps 
on créera un dessin fii de fer, facette 
après facette ou d'un coup. Sur un 
Amstrad couleur les arêtes virtuelles 
(celles qu'on négligera au traçage) 
serons codées a^ec une autre cou- 
leur (couleur 2, alors que les arêtes réel- 
les seront tracées en couleur 1). A l'Is- 
sue de ce travail nous pourrons éven- 
tuellement créer une recopie d'écran, 
à travers la ligne 

12060 SOUND 1 ,50 : GOSUB 65020 : IF 
C$ = « - THEN CALL & A000 : PRINT #8 : 
PRINT #8 

Message sonore signalant la fin du 
dessin. Mise en attente de caractère. 
Si celui-ci est le caractère barre d'es- 



pacement octlvation de la routine as- 
sembleur située à l'adresse hexadé- 
cimale &A0DQ (donnée dans la leçon 
précédente). Impression de deux li- 
gnes vides sur le papier. 

L'architecture du programme est 
un peu faite de bric et de broc, tout 
simplement parce que ses éléments 
ont été empruntés à d'autres sections 
et réunis par un MERGE. La ligne 50 
nous envole en 7000. L'ordinateur cal- 
cule alors automatiquement les pa- 
ramètres de visées (un peu comme 
un appareil photographique qui sor- 
tirait de sa boîte et se placerait auto- 
matiquement à bonne distance afin 
d'avoir une Image «plein cadre»). Ceci 
a déjà été présenté dans la 23ème 
leçon (AMSTAR & CPC - Mai 1989, 
N°33). 




7285 IF FACETTE = 1 THEN GOSUB 1 9000 

Cette ligne envoie au sous- pro- 
gramme qui réalise le tracé facette 
après facette. Même remarque. 

7290IFTRIEDRE = 1 THEN GOSUB 14000 : 
GOSUB 17000: GOSUB 18000 

Cette suite d'instructions permet 
de tracer le trièdre en même temps 
que l'objet, au prix d'un chassé-croi- 
sé également exposé dans la 23ème 
leçon. Le traçage de l'objet fil de fer 
proprement dit est effectué dans la 
double boucle 12010-12040. Il y a alors 
renvoi à la ligne 2000. En2010et2015 
on demande à l'utilisateur s'il désire 
obtenir une vue avec parties cachées 
éliminées et si les arêtes virtuelles de- 
vront figurer ou non dans cette vue. 

Si TYPE(K) = le type de l'objet n'a 
pas été déclaré (au stockage), L'Ams- 
trad demande alors quel est le type. 

Siletypedel'objetest 1 (fil de fer) 
ou 2 (graffiti plan) il est hors de pro- 
pos de réaliser une vue avec parties 
cachées éliminées. L'ordinateur va 
alors en 2999. 

Il reste deux types d'objets, qui au- 
ront droit à un traitement différent. Si 
le TYPE n'est pas 3 .c'est alors que 
c'est 4 (SOLIDE). On éliminera les fa- 
cettes non vues en basant le tracé 
sur la valeur du flag ELIMFACETTE, 

2080 ELIMFACETTE = : GOSUB 1000 : 
IF ELIMFACETTE = 1 THEN 2140 



Le sous-programme 1 000 analyse 
l'orientation du vecteur normal de la 
facette vis-à-vis de l'observateur. SI le 
vecteur pointe vers l'observateur, alors 
la facette est vue et ELIMFACETTE reste 
nul , Si le vecteur pointe au-delà , ELIM- 
FACETTE = 1 et la ligne 2080 donnera 
un non-tracé. Cette élimination des 
facettes a fait l'objet de la leçon 24 
(AMSTAR & CPC. n° 34, juin 1 989 ). 

Le problème qui nous occupe au- 
jourd'hui est celui correspondant à 
TYPE(K)=3 (Coque), 

Tout sera concentré sur la ligne qui 
résume la mise en œuvre de l'algo- 
rithme du peintre : 

2060 IF TYPE(K) = 3 THEN CLS : PR1NT 
«Un instant, je classe mes facettes...» : 
GOSUB 34000 : GOSUB 62000 : GOSUB 
36007: GOTO 21 50 

Le sous- programme 62000 ne fait 
que tracer le cadre. Dans le sous-pro- 
gramme 34000 sera opéré un classe- 
ment des facettes, de la plus lointaine 
à la plus proche. En 35000 on calcule 
les coordonnées du centre de gravi- 
té de chaque facette et on détermine 
la plus éloignée. Entre 351 50 et 35190 
on recopie cette facette dans le fi- 
chier XE(J), YE(J), XEBISCJ). Il se trouve 
que ces fichiers existent en tant que 
fichiers de travail. Ils sont d'ailleurs 
réservés dans les DIM de la ligne 4 de 
MOD1, point d'entrée de la chaîne 
de traitement . Ces fichiers ont été au 



départ créés pour un autre usage. 
XE(J), YE(J) et XEBIS sont des coordon- 
nées écran mais rien n'interdit ici d'y 
consigner de manière fugitive les trois 
coordonnées des points-objets de 
cette facette la plus lointaine. 

La suite du sous-programme 34000 
réalise un classement (par tri-bulle) des 
facettes, selon la distance à l'obser- 
vateur, Quand ce classement est 
achevé on passe alors au sous-pro- 
gramme 36007-36999. En 36020 on tra- 
ce la facette. En même temps on 
calcule l'Image de son centre de gra- 
vité sur l'écran, qui est le centre de 
gravité des points-images. 

Dans la boucle 36090-361 20 on cal- 
cule le rayon d'encombrement Re- 
facette de la facette. On ne donne- 
ra pas le même nombre de «coups 
de pinceaux» selon qu'il s'agira d'une 
facette de fort ou de faible diamè- 
tre apparent. Après différents essais 
j'ai opté pour la formule empirique ci- 
après : 

36130 Nbarres = ABS(Refacette/2) : IF 
REfacette > 200 THEN Nbarres = Nbar- 
res '2 

Autrement dit si la facette a un très 
grand rayon d'encombrement, supé- 
rieur à deux cents unités, je double le 
nombre de coups de pinceaux, 

C'est une optimisation qui limite le 
temps de réalisation des Images avec 
parties cachées. Vous remarquerez 



qu'il subsiste dans les facettes des 
points Isolés qui ont échappé au «pin- 
ceau» du «peintre». Personnellement 
je trouve que cela donne un certain 
rendu. Les puristes pourront les élimi- 
ner en doublant ou en triplant le nom- 
bre des coups de pinceaux (mais en 
accroissant le temps de calcul de 
l'image d'autant). 

La boucle 36140-36210 nettoie la 
facette tandis que la boucle 36220- 
36250 réinscrit ie contour de la facette. 
Si on a choisi de faire figurer les arê- 
tes virtuelles la couleur du trait sera 2. 
Sinon en mettant la couleur du fond 
(zéro) ces arêtes n'apparaîtront pas. 
Les autres arêtes (ligne 36237) seront 
tracées en couleur 1 . 

Le sous-programme 36000 se ter- 
mine par une attente d'ordre éven- 
tuel de recopie : 



36255 IF INKEYS = « 
62015:CALL&A0O0 



THEN GOSUB 



on retrace le cadre ou passage. 



PEINDRE 
LES FACETTES 

Voici un petit gadget. Au lieu de 
peindre les facettes en couleur du 
fond, pourquoi ne pas choisir une autre 
couleur, ia couleur 2 par exemple ? 

Ecrivons : 

2025 CL5 : LOCATE 1 0.1 2 : PRINT «pein- 
dre les facettes ? « : GOSUB 65020 : IF 
C = 15 THEN COULEUR - 2 ELSE COU- 
LEUR = 

36132 IF COULEUR - 2 THEN Nbarres - 
Nbarres " 2 

(on quadruple carrément le nombre 
de coups de pinceaux) 

36135 IF COULEUR = 2 AND RE < 50 
THEN COEF = 0.93 ELSE COEF = 1 

36136 IF COULEUR - 2 AND RE > = 50 

THEN COEF = 0.993 

Ces modifications évitent les ba- 
vures de couleur à l'extérieur du con- 
tour, Mieux vaut en mettre trop que 
pas assez. 

36190 DRAW XE.YE.COULEUR 



Effectuera ce remplissage de la fa- 
cette selon la couleur COULEUR (0 ou 
2). C'est d'ailleurs à ce moment pré- 
cis que vous serez témoin direct du 
fonctionnement de l'algorithme du 
peintre. 

Un détail : les couleurs standard ne 
marchent pas bien, faire ce type de 
travail (fond en bleu nuit, train en 
jaune, facette en bleu clair). La meil- 
leure combinaison sera inscrite en tête 
de la section VOIR: 

3INKÛ, 13 : PAPER0:INK1 ,0:PEN1 

Ceci permet de dessiner en noir 
sur un fond blanc sale (le fond blanc 
brillant fatigue les yeux), les facettes 
étant colorées en bleu clair. 



EXECUTION 

Après avoir entré l'objet CROSS- 
CAP à l'aide du programme MOD1 
et l'avoir stocké en le définissant com- 
me une coque, on appelle la section 
VOIR par 

k-Voir 

Voulez-vous un tracé du trièdre ? N 

(si oui, il vous faut l'objet TRIEDRE sur 

la disquette). 

Dessin facette après facette ? N 

(ou oui, si bon vous chante) 

signal sonore en fin de dessin. 
Vous obtiendrez alors la figure 8. 




Les images 9a à 9d Illustrent les éta- 
pes sucesslves de cette élimination 
que vous pourrez fixer sur papier, grâ- 
ce à la ligne : 

36195 IF INKEYS = « « THEN CALL &A0Û0 : 
PRINT #8 : PRINT #8 que vous rajou- 
terez. 

Jean-Pierre PETIT 



FigureS : Dessin fil de fer 
de l'objet CROSSCAP. 

Appuyez sur la touche <Return> 
Parties cachées éliminées ? O 
avec arêtes virtuelles ? N 
peindre les facettes ? N 

Vous obtenez le dessin de la figure 
4 où les parties cachées ont été éli- 
minées par l'algorithme du peintre. 




Figures 9a à 9d : Les étapes 

intermédiaires montrant le travail 

de l'algorithme du peintre. 



TABLEAU DE POINTS 



Objet CRQSi 



5 Points 



> 5 Points 






5 Points 




MOD1 



1 fl£H (superlMODl leçon CPCS27 >ZT 

2 IF FD=i THFJ 230 >LK 

3 FD=1: L = - 1 >XC 

4 DIH IT(35,12>,TT<35,i2],ZT<35,12>,N05),AV<35),a*(19 >FT 
),TYPE(19),Q<19),GY(19>,GZll9),RE(t9),IE(12),YEU2),IE 
BIS(12),YEBISU2) T ST*<191 

5 TTPE»U>="fil-de-fer":TYPEI(2)='grai'(iti":TYPE»<3)="c >VF 
oque":TYPE*(4>='sollde" 
10 CLS 

15 PfilHT'HENU PBINC1PAL':PR1HT 
2Û PRINT'a-Creer un objet" 
30 PRlHT'b-Cotpleter objet ou bloc' 
40 PBINT'c-Stocker un objet 1 
SU PRINT'd-Charier un objet" 
60 PRIWT'e-Gestion de blocs d'objets" 
70 PHlHT'f-Gestion du catalogue" 
60 PBINT*g-fUnipuler objet ou bloc' 
90 PBlHT'h-Fuslons diverses" 
100 PBlNT'l-Eiaiiner objet' 
110 PRIHT'I-Flchier objets standards" 
120 PBIHT'k-lroir' 
130 PBIHT'I-Eepresenter un objet" 
140 PBIHTi-Plan trois vues" 
150 PBIHT'n-Inverser objet ou bloc' 
160 PfilNT'o-Changer type objet ou bloc 1 >TG 

170 PBlHT'p-" >UB 

1B0 PBIMT'q-Quitter 1 >l* 

190 IF BUO" THEN L0CATE 22,17:PBIHT , B1dc resident":L >Gfl 
0CATE 22,i8:PRIKT BL» 

192 L0CATE 25,2 : PBIHT'SUPERAHSTRAD-SD 1 >JF 

193 LOCATE 29,4 :PRIHT CHBSU64);" J. P. PETIT" >NB 

195 IF EL» <) " THEH LOCATE 22,2i:PRlHT'0bjet résident >KC 
VLOCATE 22,23:PBIHT EL» 

196 'LOCATE 32,10:PBIHT"ume ";DR1VE» >TG 

197 IF LO-1 THEN LOCATE 31,23:PBWT LU;" ch.'iLOCATE )Wfl 
22,25:PR1KT TYPE» 

198 LOCATE 3, 22 >YC 
200 GOSUB 65000 >UH 



m 



>QL 






205 IF C^ll THEH CHAIH'VOIR >B 

210 IF C=17 THFJïEND >HT 

217 IF C=14 THEN CHAI» "(1002 >VN 

220 IF C<1 OS C)17 THEN 10 >RL 

230 ON C GÛSUfi 9000,13000,9000,5000,21000,22000,64000,6 >PU 
4000,10000,20000 

999 ùERA,'i.bak":G0T0 10 >UK 

5000 'CHARGER OBJET >IH 

5005 CLSiPRIKT-Charger objet (disquette objet !...)':PR >T0 
IHT 

5007 IHPUT'Noi de l'objet ";£H(K):IF LEH (ELt(K)>>8 TH >FF 
EN PRIHT'B caractères seulement, pressez <Return>':GOSUB 
65020: GOTO 5000 

5010 ELI=Flt(K):PRllfT , Je charge ',*&*«] >LZ 

5020 QPENIH at(K}:ELt=ELt(K) >XC 

5030 1HPUT t9,TYP£(K),GïllO,Gm>,GZ(K),R£lK),L >BJ 

5040 FOB I « TO L >FC 

5050 1HPUT t9,N{l),AV(I) >ÎU 

5060 FOR J = TO N( [) >NC 

5070 IMPOT I9,ITU T J),ÏT11,J),ZT(1,J) >FE 

5060 NEÏT J:NEIT 1 >Hlf 

5090 CLOSE IN >HE 

5095 TTFEMTTPEI(TTO(KM:TTFE*nPE(K) >KC 

5999 RETURH >HF 

6000 'STOCKER OBJET >U 
8001 CLS:PBINT*STOCKER UN OBJET (disquette objet !..)": >VÏ 
PRiNT:IF L=-l THEN SOUND l,30,20:PRINT'Pas d'objet resi 
dent !':F0R TT=0 TO 200:HEXT::G0T0 6999 

6002 IKPUT'Noi de l'objet ";ELt(K):!F LEH (EL»(K))>6 r TH >VN 
EN PB1KT:PRIHT*8 caractères seuleaent, pressez <returh>' 
: GOSUB 65020: GOTO 6000 

8005 ' >ÏF 

6007 ELt=ELt(K> >YB 

8008 CLS:PRlHT»Type de l'ob1et":PBIHT:PRIhT , a-Fil-de-ie >AK 
r'iPRlNT'b-GraffitiVPRIHT-c-Coque'^RINT'd-Solide'iGÛS 
UB 65000:TÏPE(K)=C:TTPE*=TÏPE*(C> 

8010 PfiiNT'Je stocke l'objet •?■#»«■ ';TYPE*(TYPEIK) >HV 
) 

6020 GOSUB 44000 >DÊ 

8022 IF TYPEIK)=4 THEN GOSUB 38000 >kU 

8025 OPEHOUT ELUS) >HB 

8030 PRIHT t9,TYPE(K),GI(K),GY<K),G2<K),RE<IO,L >BJ 

8040 FOB I = TO L >FF 

6050 PBIMT I9,H(1),AV(1) >TD 

6060 FOR J = TO H(I) >HF 

6070 PB1HT I9,ÏT11,J),YT(1,J),2T(1,J) >FE 

8080 HEIT i ; NEIT i >NB 

8090 CLOSEÛUT >ZH 

6100 EL»=ELt(K) >» 

8999 RETUBN >HJ 

9000 'CREER UN OBJET >YB 
9005 L=-l:K=Ktl:EL*UO=":EL*=":TYPE*=" >HZ 
9010 aS:P8INT"CB£EB OU CÛHPLETER UH 0BJET":PR1NT:PRINT >RH 
"a-Chaine par chaîne" 

9020 PRINT'b-Objet de révolution' >KI 

9040 PRINT'c-Travailler sur objet standard' >AB 



9050 PBlKrd-Prls>,e' >TZ 

3060 PBIHT'e-Cercle' >TP 

9070 PBINT'f-Arc de cercle" >AN 

9090 GOSUB 65000 >EF 

9095 Cl-C >DK 

9100 IF C>6 0B C =-51 THE» 9999 >V7 

9102 IF C<0 THEN 9000 >NE 

9104 CBEAT10«=C >U 

9106 IF TYPEIK1O0 THE» TÏPE=TÏPE<K! :PBIKT:PBI»TL'ob je >JP 
t est de type ';TYPEI(TYPE<K)):FDB TT=0 TO 1000:HE1T TT 
:GOTO 9110 

9108 CLS:PBIHT'Definir le type de rob)et:':PBIHT:PBlHT >ED 
■a-Fil-de-feT':PEINT'b-Graffltl":PBIHT'c-Coaue':PBINT'd 
-Sollde':GOSUB 65000:TYPE(K)=C:TYPEI=TYPE*ITYPE(lO):TYP 
E=IYP£(K) 

9109 IF CBEATIONH «H CRE«TI0»<7 AND TVPEOl «NO TYPE< >CU 
>2 THEN CHAIM*H0D1BIS 

9110 IF CBEAT10N<3 THEN 9500 >HP 
9120 IF TÏPEM THEN 9500 >BU 
9500 ON CBEATION GOSUB 26000,34000,11000, 54000,32000,33 >»H 
000 



>CG 



m 



>XB 



9999 BETOBN 

10000 'EIAHINEE OBJET 
10999 BETOBN 

26000 'CBEEB CHAINES AO CUV1EB 
26010 GOSUB 60000 

26017 IF CE ■ 2 THEN GOSUB 14000:GOTO 26999 
26020 L=L41:JF LM2 THEN CLS ; PB ï HT'Trop de chaînes.. 
SOUND 1,20:F0R TT=0 TO 1000:NEÏT TT:G8T0 26999 
26025 CLS: PEINT-SAISIE CHAINES AU OAflEIVPEINT 
26030 IHPUT'Hoabre de setaents ";N(D 

26035 PBIHT:PBlHT'Aretes virtuelles en début de chaîne. 

':PBIHT:l»PUT'Leur ncwbre ";AVt:PEIHT:IF AV$=" THEN Aï 

1L)=0 ELSE A»(L»VALtA»l> 

26040 FOB J=0 TO NIL) 

26050 PBINT'Point muera 

26060 INPUT*n='(niL,JI 

26070 INPUT'TT=':YT(L,J) 

26060 INPUrZT-iZTIL.J) 

26090 NEIT J 

26100 PEINT' 

20:1F C = 15 THE» 26025 

26130 PEINT' Une autre chaîne ?":LC=28:G0SUB 65 >FC 

020: IF C = 15 THE» 26010 

26999 BETUBN >PH 

29000 ' INVEBSEB FACETTE >DG 

28010 H=-l >HE 

29015 IF DBIVE2=1 THE» ÙS ELSE OA >AU 

29020 FLAG»IBTUEL=AVU) 

29025 IF FLAGYIBTUEL=0 THEN 29070 

29030 FOB J=AVU] TO STEP-1 

29040 N=N*1 

29050 IEIH)=CT1],J):YE<«)=YT1I,J):IFJ1IS(»)=2TI1,1I 

29060 NEIT J 

29070 FOB J'NUI-FLAGYIBTUEL TO Alll) STEP-1 

29060 N*l 



■iJ.l 



Une erreur ?':LC=28:G0SUB 650 >AZ 



m 

>BD 



>TE 



>«2 
)TJ 



29090 II(K>=IT(l,J):YEl»)=YT(l,J);IEBIS(N)=ZTII,J] >M 

29100 NEIT J >BG 

29110 FO! J=0 TO NUI >»A 

29120 XT(l,J)=XEIJ):YT(l,J)=YEIJ>:ZTl[,J)=IEBIS{J) >ÏT 

29130 HE1T J M 

29999 BETUBN >QA 

38000 'ÏERIFIEB FACETTES >DG 

36010 FOC 3=0 TO i. )LF 

38020 IABETE1=IT(I,1>-IT(I,0) >YJ 

38030 YAB£TE1=YTII,1)-ÏTII,0I >ÏN 

38040 ZABETE1=ZT(1,1)-ZTU,0) >YT 

36050 ÏABETE2=ÏT(1,2)-ÏTII,1) >YQ 

36060 YABETE2=YTII,2)-ÏT(I,1) >YV 

36070 ZA»ETE2=ZT(I.2>-ZTll.l) >7Z 

38060 NI=-«AIETE2IZAIiETEl<*A8ETEli2ABETE2 >NZ 

36090 NT=-ZABETE2IIABETEl>ZAIiETEliUBETE2 >NZ 

38100 NZ=-XABETE2>YABETEHIAB£TEMABETE2 )NP 
38110 PSCALAlBE=(IT([,l)-GX[IO)»NI*{YTfI,l)-GY(K)Hnv+l >ZD 
ZT(l,l)-GZ(K))iNZ 

38120 IF PSCALAIE£<0 THEN GOSUB 29000 )EN 

38130 NEIT I >BJ 

38999 BETUBN >8A 

44000 'CALCUL CG ET BE >DD 

44010 GI=0:GY=0:GZ=0:N=0:BElKI=0 >BP 

44020 FOB 1=0 TO L: FOB J=0 TO NU) >ZD 

44025 H=»»l >TE 

44030 GI'GItITlI.J) >PB 

44040 GY=GY+YTU,J) >PF 

44050 GZ=GZ1ZT(I,J) >lt 

44060 NEIT J:NET I >NG 

44070 GI(K)=GI/N >LZ 

44060 GY(K)=GY/N >LC 

44090 GZ(K)=GZ/N )LF 

44100 FOB 1=0 TO L:F0B J=0 TO NID >ZP 
44110 B=S0B <<ITIl,Jt-GHK)).UTU,J)-GI(Km(YT(l,J)-G >HJ 
YlKlli(YT(l,J)-GY(K)H(ZTU.J)-GZ(K))i(ZTII,J)-GZ(IO)) 

44120 IF BEIKXE THEN BE(K)=E >UJ 

44130 NHT J:NEXT I >HE 

44999 BETUBN >PH 

60000 'TYPE DE SAISIE >DB 

60005 SE=0 >LB 

60010 CLS : PBIKT'DEFIIITION TYPE DE SAISIE':PBI»T >IY 

60020 PBINT'a-Salsle clavier Ipar défaut)' >«L 
60030 PBEHT'b-Saisie écran (Conteur polygonal planl'lGO >JH 
SUB 65000;CE=C 

60040 IF CE<>2 THEN CE=1:G0T0 60999 >BT 

60999 BETUBN >PF 

65000 'SAISIE DE CABACTEBE >DG 

65010 PEiNT:PBIItT'Votre choii :' >FU 

65020 Ct=":Cl=IHKE7!:IF Ct=" THEN 65020 >R 

65030 C=ASCICI> >IF 

65035 IF C=13 OB C= 32 THEN C=27:G0T0 65060 )GH 

85040 IF C>96 THEN C=C-96:G0TO 65060 >CH 

65050 IF C<96 THEN C=C-64 >BU 

65060 SOUND 1,20,5 >LZ 

65535 BETUBN >NG 




VOIR 



1 BEK (Super)UOlB 16 Juin 89 avec part. cach. elia. >UK 

2 IF FD = THEH CLS : PRIHT'Pas d'accès direct a VOIE. >DA 
..":PRIHT:PBIHT'Je vous renvois sur HODl...':ùA:EWHfOI> 

r 

3 INK 0,13:PAPEB 0:IKK t,0:PEH 1 >YP 
5 OS : LOCATE 17,12 : PBIHTMQIR..." )DL 
7 !F L =-1 THEN PRII*T:PBIHT"Pas d'objet résident, reto >UF 
ur sur MDl....»:ELM , *tC=0:CMAm , HODl* 

10 GOSUB 44000 >PC 

20 BORDES 26)RHD:CLS >PH 

25 IF EL* O " THEH L0CATE 25,21:PRIHT"Objet résident' >ZD 
:LOCATE 25,23:PR!HT EL*:L0CATE 25,2S:PRIHT TYPE* 
30 LOCATE 13,10 : PBINT" Desirez-vous un trace du tri >VQ 
edre ?":GQSUB 65O20:IF C=15 THEH T81EDRE=1 ELSE TRIEDRE 



40 OS:LOCATE 6,10:PRIHT*0«9sin facette après facette ? 

■: LOCATE 7,12:PBIHT'(facettes virtuelles en bleu)':G0SU 

B 65020:1F C=15 THEH FACETTE =1 ELSE FACETTEE 

50 GOTO 7000 

1000 'FACETTE VIE ? 

1010 IGFACETT£=O:YGFACETTE=O:ZGFACETTE=0 

1020 FOB JJ=0 TO N(l)-l:'Calcul CG facette 

1030 IGFACETTE=IGFACETTE+ITU,JJ> 

10*0 YGFACETT£=YGFACETTE*iTU,JJ) 

1050 ZGFACETTE=ZGFACETTE*ZTU,JJ) 

1060 NEIT JJ 

1070 XGFACETTE=IGFACETTE/H(I> 

1080 YGFACETTE=fGFACETTE/H<l) 

1090 ZGFACETTE=ZGFACETTE/HU) 

1100 1AIETE1<XT(I,U-IT([,0) 

1110 YABETE1=YTU,1)-YT!I,0) 

1120 ZARETE1=ZT(I,1)-ZTU,0) 

1130 XARETE2=XT(l,21-ITtl,l) 

1140 YARETE2=YT(1,2)-YTU,1) 



m 



1150 ZABETE2=2T(1 T 2)-ZTU,1) >IH 

1160 KX:-YA££TE2«ZARETEltï ARETE HZAIEIE2 >rtA 

1170 NY=-ZAiETE2tXARmi+ZARETEltIARETE2 >HÀ 

1180 HZ=-XABETE2iïABETEl*XABETEl<ÎASETE2 >HA 

1190 PSCAUlRE=(IGFACETTE-ïfl)*Nït(ÏGFACEnE-YH)«NÏ*{2GF >ZH 

ACETTE-ZH)»HZ 

1200 IF PSCALAlRE>=0 THEH ELIrffACEÎTE=i >JF 

1999 RETURH >HB 

2000 REH Obtet de)a présent en m» ire >GT 
2005 V1RTUELLES=0 >NT 
2010 CLS:LÛCATE 8,12:PRlHT*Partles cachées eliilnees ?* >BI 
: GOSUB 65020: IF C<>15 THEH 2999 

2015 CLS: LOCATE 9 ( 12:PRlNT"avec arêtes virtuelles ?":G0 >JU 

SUB 65020: IF C=15 THEH V!RÏUEUES=! 

2020 IHTERACTIMM) >PD 

2025 CLSiLOCATE 10,i2:PRlHT , peimire les facettes ?':G0S >ZB 

UB 65020:1F C=15 THEH CÛULElffi=2 ELSE COULEUfi=0 

2030 CLS >ZE 

2040 IF TÏPE(K)=0 THEH PBIhTTYPE DE L'OBJET" :PBI»T:PHi >YW 

HT» 1 -F 1 1 de- f er » : P8 1 HT"2-Graf f 1 1 i ■ : PB WT"3-Coque ■ : PB I HT 

■4-Sallde l :PBINT:G0SUB 65000: TYPE=C: GOSUB 62000 

2050 IF TYPEIK>=1 OS TYPE<K)=2 THEN GOTO 2989 >LA 

2060 IF TYPE(K>=3 THEH CLS:PRlKT'Un instant, je classe >GQ 

■es facettes...': GOSUB 340OO:G0SUB 62000:GOSUB 36007:G 

0T0 2150 

2070 F08 I = TO L >FC 

2080 R[HFACETTE=0: GOSUB 1000:1F aiHFACETTE=l THEH 214 >BH 



2090 FOB J-Û TQNU) 

2100 HE=0 

2105 IF J>AV(1) THEH CO=i 

2107 IF VIBTUELL£S=1 AHD J<=AV(I) THEH C0=2 

2108 IF V1RTUELLES=0 AND J<=AY(I) THEH CO=Q 
2110 GOSUB 15000 
2120 NEIT J 
2140 NEIT I 

2150 SOUND 1,50:G0SUB 65020:1F C*=' 
BIHTI8:PBIHTt8 
2999 RETUBN 

7000 REH Représenter un objet 
7010 AH » 20 

7040 XH = GI(K) * RE(K) i 3.S 
7050 m * GY(K) * RE(K) i 2.5 
7060 Zll = GZ(K) + RE(K) i 1.5 
7080 XG = GI(Kt:YG=GY(K):ZG=GZ(K> >BD 

7090 CI = XG - IH : CY = YG - YH : CZ * ZG - ZH >EY 
7100 OD - Sflfi (CUCI + CY*CY ) >VF 

7110 IF DD = AHD a > THEH TE » : Kl = PI / 2 : G >Utl 
OTO 7210 

7120 IF DD - AHD CZ < TVB2H TE = : Kl »-PI / 2 : G >ÏJ 
OTO 7210 

7130 Kl = ATH (C2/6D) ÎHJ 

7140 IF CX = AHD CY > THEH TE = 1.57 : GOTO 7210 >LQ 



>KL 



' THEH CALL (cA0O0:P >QY 



>T0 
>TT 
>TV 



7150 IF CI = AHD CY < THEH TE =-1.57 : GOTO 7210 
7160 TE = ATH <CY/CI) 



>HU 



7170 IF Cï < AND CT > THEH TE 
7180 IF Cï < AHD CT < THEH TE 

7190 IF Cï < AHD CT = THEH TE 
7200 IF Cï = AHD CT < THEH TE = - 
7220 BEH 

-- COS 1TE) : ST = StH (TE) 
: COS (Kl) : SK = SIH (Kl) 
s CMCT : TU = CKiST : ZU=SK 



PI 



7230 CT = 
7240 CK = 
7250 ÏU * 
7260 ÏV = 
7270 ÏU = 



■ ST : YV = CT : ZV = 



■ SKtCT : TU = - SfciST : Zv « CK >CC 

72BO GOSUB 62000 >E£ 

7285 IF FACETTEE THEH GOSUB 19000 >BB 

7290 IF TRIEDRE=1 THEH GOSUB 14000 : GOSUB 17000 : GOT >CÏ 
18000 

12000 REM Objet delà présent en nuire >HD 

12010 C0=1 >JK 

12020 FOR I = TO L : FOB J = TO Hli) >AH 

12025 IF J<=AV(I) THEH CO-2 ELSE C0=1 >CA 

12030 GOSUB 15000 >LH 

12040 NEIT J:HEÏT I >HZ 

12050 C=0 >AD 

12060 SOUND 1,SÛ:GÛ5UB 65Q20ilF C*=" ' THEH OU. UOOO: >TC 
PRIHTI8:PBIHTI3 

12070 GOSUB 2000 >CG 

13000 SOUHD 1,200 : CHAIH'HODI' >IB 

13010 CHAIH'HODf >LU 
14000 REH SAUVEGARDE ET DESSIH DE L' OBJET RESIDENT >CU 

14005 CO = 1 >KJ 

14010 QPEHOUT'SAUVDBJ" >TH 

14020 PRIHT»9,CQtK),GI(K),GT(K),GZ(K),fiE<K),L >PT 

14030 FOR I = TO L >LL 



14040 PRIHTI9,H(l),Àlr , (h 


>TN 


14050 FOR 3 -- TO H(l) 


>HN 


1*060 PBIHTI9,ÏT(I,J),ÏT(1,J),ZT(I,J) 


>GE 


14065 GOSUB 15000 


>LY 


14070 HEIT J : HEÏT 1 


>HR 


14080 CLOSEQUT 


>FE 


14999 RETUfiH 


>PE 


15000 REH Calcul et trace iuge 


>ZC 


15040 ÏL=ÏT(1,J)-ÏH 


>PP 


15050 YL=YT(1,J)-YH 


>PU 


15060 ZL=ZT(1,J)-ZM 


>PY 


15090 IA^XL«ÏUtTLiYU»ZLiZU 


>U 


15100 ÏA=ÏLHV*TL*ÏVtZLiZV 


>IT 


15110 ZA=ILiIU4TLiTUtZLiZU 


>rr 


15121 IF ÏA=0 AHD YA=Û AHD ZA=0 THEH ZA=0.001 


>KJ 


15122 RO = SDRCYAiYA+ZAtZA) 


>ÏF 


15125 IF IA=0 THEH B*90:G0TG 15127 


>AT 


15126 B=ATN(B0/U):B : Bil60/PI 


>ÏD 


15127 IF ÏA<0 THEH B=BH80 


>TK 


15130 IF ÏA=0 AHD ZA=0 THEH A=90:G0TO 151B0 


>JB 


15140 IF ZA=0 AHD TA >0 THEH A=-90:GOTÛ 15180 


)KH 


15150 IF ZA=0 AHD TA<0 THEH A=90:GOTO 15180 


>JC 


15160 A=-ATH(YA/ZA):A=A»180/PI 


>YZ 


15170 IF ZA<0 AND ÏA >0 THEH A=A-180 


>AD 


15172 IF ZA <0 AHD TA<0 THEN A=A»180 


)AJ 



15174 IF ZA <0 m YA =0 THEN A=160 


>ZN 


15180 I=B»SIH(AiPI/18O):ï=8iCOS(AiPl/lB0) 


>Kf 


162*0 IE=313tH300/AH 


>Pl 


15250 ÏÉ=200*ïi300/AN 


)PJ 


15255 IF J=0 THEH PLÛT IE,YE,CO ELSE DBAU 1E,YE,C0,0 


>YB 


15990 BETUBH 


>PF 


17000 BETI TRACE TBIEDfiE 


>T0 


17006 CO = 3 


>LD 


17010 OPEHIH'TBIEDRE" 


>«D 


17020 IHPUTI9,C0(!O,GI,GY,GZ,BE.L 


>CB 


17030 FOE 1 = TO L 


>UP 


17040 INPUTI9,H<1),AYU) 


>ro 


17060 FOB J = TO Hll) 


>HB 


17060 INPUTt9,JT(l,JI,YTII,J>,ZTtl,J> 


)GL 


17070 GOSUB 15000 


>U 


17060 NEIT J : NEIT 1 


m 


17090 CLOSEIN 


m 


17999 BETUBN 


)PH 


18000 BEH RECHABGEfi OBJET 


>1IF 


18005 CO = 3 


>LE 


16010 OPEHIH*SAUVOBJ* 


>BB 


16020 !NPUTI9,C0<K),GI(K>,GTIK).CZ<K),BE(K>.L 


>PA 



FAIRBANK ? 

Pas une autre gestion de compte bancaire ? 
Si, si,... mais quel programme ! 

Enfin, une "gestion décompte bancaire" d'une efficacité impressionnante, 
d'une simplicité éclatante. Un véritable livre de caisse de 40 colonnes sur 
disque. Quarante pestes, ou comptes, numérotés, dénommés par vous et 
indexés, auxquels toutes transactions sont attribuées. Lister ou imprimer, 
par poste, par nom, par catégorie, de date à date, etc. Analyser à tout 
moment l'ensemble de vos dépenses et recettes. Afficher les soldes des 
postes à plein écran. Idéal pour incorporer dans une comptabilité 
traditionnelle. 

Une importante caractéristique de FAIRBANK est d'avoir toujours sur l'écran 
la dictée nécessaire pour effectuer chaque étape de l'opération en cours 
sans aide extérieure. 

Enregistrer un chèque ? Plus simple que de l'écrire dans un chéquier, semi- 
automatique en fait. Toutes écritures sont triées, classées. Un relevé de 
compte ? Jeu d'enfant ! Saisir deux dates, le listing s'affiche et, à la deman- 
de, une concordance avec le relevé bancaire parait, toute différence chiffrée. 
POUR CPC 6128 SEULEMENT 25 A C 

PORT PAYE ■ ENVOI LE JOUR MEME 



UTILISE LE DEUXIEME 6 



16030 FOR 1 = TO L >LQ 

18040 iHPUTi9,N(l),AV(I> >TV 

1B050 FOB J = TO NU) >NT 

19060 INP(JTI9,XT(I,J),ÏT(!,J),ZT[1,J> >GH 

18080 NEIT J : NEIT I )NÏ 

18090 CLOSEIN >UJ 

18100 ÙEBA/SAUVOBJ 1 >QT 

1BU0 C = >AK 

18115 SOUND 1,100 >LZ 
16117 SOUND 1,50:GQSUB 65020:1F «=' ' THEN CALL UOOO: >TH 
PRINTI8:PRIHTtB 

18118 G0SL1B 2000 >DF 

18999 CHAIN'NOD!" >HU 

19000 'DESSIN FACETTE APRES FACETTE >DF 
19010 FOR 1=0 TO L >LE 
19015 CLS >GB 
19020 FOR J=0 TO NU) >NZ 
19030 IF J)Alf(l) THEN Cû=l ELSE C0=2 >CD 
19035 FOR TT=0 TO 200:NEXT n >UL 
19040 GOSUB 150110 >L« 
19050 NEIT J >BK 
19060 LOCATE 1,1:PR1NT'FACETTE *:hl:PRlHT*Pressez <Ret >FE 
urn>VGOSUB 65020 

19070 HEn I >CA 

19075 CLS >GH 
19080 IF TRIFJ)RE=1 THEN GOSUB 14000:G0SUB 17000:GOTO 18 >CJ 
000 



19999 RETURN 

34000 ' CLASSEMENT FACETTE DANS OBJET 

34005 IF 1=0 THEN 34999 

34010 11=-1 

34020 U=IIH 

34030 IF ItsL THEN 34999 

34040 GOSUB 3S0OO:'Recherche distance lasisale 

34050 FOR !=IIUI-1 TO 11 STEP -1 

34080 FOR J=0 TO NU) 

34070 ITUU,J>=ITU,J) 

34080 YT(!U,J>=YT(I,J) 

34090 ZT<I+1,J>=ZTU,J) 

34100 NEIT J 

34110 NU*1)=NU):AVUM)=AVU) 

34120 NEIT I 

34130 FOR J=0 TO NHAI 

34140 XT(I1,J)=XE(J) 

34150 n(Il,J)=TE(J> 

34160 ZT(U < J)=XE£ISU) 

34170 NEIT J 

34180 N(I1>=NHAI;AIM!I)=AVHAI 

34190 GOTO 34020 

34999 RETUBN 

35000 'FACETTE LA PLUS LOIN 
35010 OHAS£=0: SOUND 1,20 
35020 FOR 11=11 TO L 

35025 XGFACETTE=0:YGFACETTE=0:ZGFACETTE=Q 

35030 FOR J=0 TO NUI) 

35040 IGFACETTE=IGFACETTE+ITUI,J) 



>PX 



35050 YGFACETTE=ÏGFACETTE+YTU],J) >FA 

35060 ZGFACETTE=ZGFACETTE+ZTUI,J> >FE 

35070 NEIT J >BK 

35080 XGFACETTE=IGFACETTE/(NU[m> >FA 

35090 YGFACETTE=YGFACETTE/<NUl)H) >FD 

35100 ZGFACETTE=ZGFACETTE/(N(IIM) >EF 

35110 DFACETTE=(IGFACETTE-lffl)i(IGFACETTE-ffl)+lTGFACETTE )JP 

-ÏM)*(ÏGFACETTE-ÏH)KZGFACETTE-ZNH(ZGfACETTE-a) 

35120 IF DFACETTE>DHAI THEN WWI=DFACETTE:1)WI=II >HD 

35130 NEIT II >LB 

35140 NnAX=N<iHAI):Ami=AV(IHAIh'Preserver facette a >EI 

distance tantale dans fichier dispon. 

35150 FOR J=0 TO N(lrlAX) >RA 

35160 X£<J)=XTUHAX,J) 

35170 YE<J>=YTUNAX,J) 

35180 XEBIS(J)=ZT(IHAI,J) 

35190 NEIT J 

35999 SETURN 

38000 'ALGORITMK DU PEINTRE 

36007 FOR 1=0 TO L 

36008 IGEf acet te=0 : YGEf acet te=0: BEI ace t te=0 
36010 FOR J=0 TO N(I) >NX 
36015 IF I04K1) THEN C0=2 EL5E C0=1 >CF 
36020 GOSUB 15000 >LT 
36030 XEU)=IE:YEU)=YE >ïtf 
36040 IF J>0 THEN XGEfacette=XGEfacette+XE >HE 
36050 IF J>0 THEN YGEfacette=YGEfacette*ï£ >(U 
36060 NEIT J >BK 
36070 XGEtacette=XGEfacette/N(l) >CY 
36080 YGEfacette=YGEfacette/N(i) >CB 
36090 FOR J=0 TO N(I) >NF 
36100 DD=SQR<<XE<J)-IGEfacette)i(XE(,])-XGEtBcette) + <YEl >EA 
J)-YGËfacette)«(YEU)-ïGEfacette)l 

36110 IF DD>KEtacette THEN 6£t««Ue*DD >JD 

36120 HEÏT J >BG 

36130 Nbarres=INT(REfacette/2):IF RF.f acet te> 200 THEN Nb >ZG 

arres=Nbarrest2 

36132 IF COULEURS THEN Nbarres=Nbarresi4 >UJ 

36135 IF C0ULEUR=2 AND RE<50 THEN COEF=0.93 ELSE CDEF=l >K 



>RD 



>DE 
>LK 
>8D 



)TJ 


36138 


>BD 


36140 


>PÏ 


36150 


>P7. 


36160 


>PC 


36170 


>T0 


36180 


>BK 


361S2 


>YX 


36184 


>BJ 


36190 


>PG 


38195 


>I)I) 


36200 


>RD 


36210 


>HJ 


36220 


>MH 


36230 


)PT 


36235 


>EE 


36236 



IF C0ULEUR=2 AND RE)=50 THEN CDEF=0.993 

FOR Jl=0 TO NIU-1 

FOR JJ=0 TO Nbarres 

X£:IEUl>+(IEUl>l)-XEUl)HJJ/tlbarres 

YE=YEUi)+(YE(Jl+l)-YE(Ji)HJJ/NbaiTes 

PLOT XGE facette, YGEf acette 

XE=ÎGElacette+<XE-IGEtaeette)iCOEF 

YE=YGEfacetteHYE-YGEfacettel»COEF 

DRAU XE,YE,COULEUS 

IF iNKEÏ*=" ' THEN CALL 4A000:PRINT I8:PRIHT IB 

NEH JJ 

NUT Jl 

FOR J=û TO N([) 

HE=0 

IF J<=AV(I) AND V1RTUELL£S=1 THEN C0=2 

IF j<>AV{|) AND VIRTUELLES=0 THEN C0=0 



>HB 



36237 IF J>AY(11 THEN C0=1 r 

36236 IF J<=AV( 1 1 ANO CIHJLEUÏ=2 THEN C0=2 i 

36240 GOSUB 15000 > 

36250 NEIT J > 

36255 IF ÏHKE1*=" " THEN GOSUB 6201S:CALL kAOOOiPBINTie > 
:PRINTI8 

36256 SOUND 1,300 ) 
36260 NEIT I > 
36999 RETURN > 
44000 REH Calcul de CG et de RE i 
44010 GÏ=0:GÏ=O:GZ=Ù:H=Ù:RElkJ=Ù ? 
44020 FOR 1=0 TÛ L: FOR J=Q TO Mil) > 
44025 N=N+1 ? 
44030 GI=GMTll,J) > 
44040 ST=GÏ+TTU,J) > 
44050 liZ=GZ*ZT(l,Jj > 
44060 NEIT J: NEIT 1 ) 
44070 GX(K)=GX/N > 
44060 GT(K)=G¥/N > 
44090 GZIK)=G2/N ) 
44100 FOB 1=0 TO L:FQR J=0 TO N(l) i 
44110 R=SQR (<XTl[,JJ-GX<KmiIT{l,J)-GX<K))tefTU,J)-G ) 
ï(K))t(ÏT(l,J)-GÏ(K)) + (ZT(l,J)-GZ(K))KZT(l,J)-GZ(K))) 



44120 IF HE1KKR THEN REIK)=R 


S 


44130 HEJT JrNEXT 1 


m 


44999 SETURN 


>PH 


62000 BEA CADRE 


>BB 


620 10 CLS 


>FE 


62015 BOEDER 34 


>K 


62020 PLOT 0,0 


>LH 


62030 DRAW 639,0,3 


,u 


b2040 ûSAt! 639,399,3 


>NP 


62050 DkAU 0,399,3 


>LR 


62060 MM 0,0,3 


>ZA 


62070 CO = 3 


>LF 


62999 RETURN 


m 


65000 REH Saisie caractère 


>VB 


55005 PSI NT 


>CD 


65010 PRINrVotre choii t* 


>ZF 


65020 C*="":C*=INKE($;1F Cl=" THEN 65020 


>FL 


65030 C=ASCIC») 


>XF 


65035 IF l>13 08 C= 32 THEN C=27:liÛT0 65060 


?Q\ 


65040 IF C>96 THEN C^C-96:GOT0 65060 


>CH 


65050 iF C(96 THEN C=C-64 


)RU 


65060 SOUND 1,20,1 


>LV 


65535 RETUEN 


>HG 




KRISTAXestunjeu 
d'arcade auquel vient 
se joindre une part de 
stratégie. Alors ne vous 

précipitez pas pour 
résoudre les tableaux. 



Volnble pr-ur 
S CPC 4M 

H CPC 664 
m CPC 6128 



Vous habitez sur KARIS. une lune 
morte. Votre seule source de 
vie est le Kristax, formidable 
énergie qui alimente votre planète. 
Mais le démoniaque XORK vous a volé 
cette énergie pour alimenter une base 
sur laquelle il crée d'horribles mutants. 
Votre mission est de récupérer le Kris- 
tax dans les 1 2 secteurs du complexe. 
Les dés ouvrent les portes, les bom- 
bes fraient des passages (un trou à 
droite de votre héros), les lasers immo- 
bilisent un mutant qui est toutefois mor- 
te! si on le touche. 

Les points d'Interrogation sont des 
bonus (ou des malus). 



ATTENTION : le programme exécu- 
té peut afficher ie message «Memo- 
ry fut! in 90», si c'est le cas faites run 
une 2ème fols et le programme mar- 
che. 

CHARGEMENT : les listings 2 et 3 gé- 
nèrent 2 programmes binaires qui doi- 
vent être sauvegardés après le 1er pro- 
gramme Basic. 

COMMANDES : Flèches curseur = faire 
bouger le héros 

COPY = saut, si vous avez une 
bombe = explosion 
Si vous avez un laser = tir ou Joystick 

Stéphane DE CANEVA 




\SpFt 



S 10 IF PEEKCIAOOOKM THE» MHB1Ï A5800-1:LOAD"I<BISTAH' 

:UUD'KIISTU2';P0KE UOOO,1 
V 20PE» 1 

S 30 'ïHmfiCOULEUBSiti*»» 
\tO DIT* M, 24,3,6, 15,0,11, 2,23,26, 12,16,19,9, (,15 
.50 FOI A=0 TO 15:BEAB BsIHK A,B:NEITlilK 12,0,26: IH 15 

,26,0 

60 '"iiilHlTIALISATIDHi"" 
@)POKE tS02B,15:FWE U030,W:CU1 19067:DW ECI120.11 

1,SPB<20>,LE<26> 

80 F08 A"0 TO !8:SPB(«>=»57C04(Ai64i:«EIT:»!l!=l:VlE=4:C 

LE=0:BESTOBE 960 

A"0 TU 9:CH(A>=t5CCO*IAil6):KFTT:F0E A=0 TO A:IE 

(Atl>=b5D70*<A«16>:HEXT:F0R A=S TO 25:LE(A*I)=A5D70+((A 

•2)1161 :HFjrr 

100 GOSUB 2A10:POKE Afl02B,15:POKE fc9030,40:CALL 19067 

uo mode n-.mam o:papeb 5:CLS:»nfDo«ii,i,ie,5,25;PAPE 

1 !1,0:CLSI1 
*<J^FOI! A=152 TO A68 STEP 4:H0VE A,398:BiA« 0,-2B,0lHE 

ÏT:ÙSP!ITE,20,l,i5F40:P0KE B902B,16:P0KE A9030,4:CALL 1 

9067 
\ 130 A=3:B=16:*S="SIW:«BIIB 670:A=12:AI='HISC01E':EDS 

UB 870:J=22:A«="IIV£S':GOSUB 870:A=32:A!= , STAGE , :G0SUB 

870:A=30:B=4:At=*KEYS":GOSlffl 670 

140 L0=7:l=O:A=2i!=24iG0SUB 8Ot):A>12:I'5O0OO:GOSUB 890: 

L0=5:I=4:A=22:G0SUB 8B0:A=32: l=0:GOSUB B90:LO=3:A=35:B= 

4:I=0:G0SUB 890:H!V=1 

150 '«HiDESSIH DE BASEfiiM 
■<i®)lF H1V=13 THEN PAPEEt ll,5:CLStl:A=l:BM6:At= a FELICI 

TATIO»":GOSUB 870:B=64:At="V0US AVEZ BETBOUVE': GOSUB 87 

0:B=BO:A»=TOUS LES *J1STAIS':G0SUB 870:B=96:AM'SAUVE 

LE KHiBE'reOSIlB 870:B=U2:At'"ET DETBUIT LES »UTA»TS':G 

OSUB 870:CAIL ABB06:BIV=1 
\170PAPEB I1,0:CLSI1 

180 BESTOBE 3020:1W 0,24:CLSI1:TAA=0:CLE-0:PAPEE 0:LOC 

ATE 6,12:PE> 5:P1WT , STACE";«IV 

190 BEAD AI,B*,C1:IF A«<>'-1' THE» SOUND l,VALI-l-<At>, 

VALI'B'tBD.VALI'li'ta) EUE 210 

200 GOTO 190 
\21OF0B A'1 TO 1500:«En:UKATE6,12iPBl»T" "iLO 

■5:B=24:A=32:l=»l»-l:G0SUB890iU).S:»'24:A=32:l=»llJ:a!S 

118 880 

220 IF «IV'l THE» BESTOBE 960 ELSE IF Bll'2 THE» BESTOB 

E 1080 ELSE IF »IV=3 THE» BESTOBE 1200 ELSE IF B»»t TH 

Et BESTOBE 1320 ELSE IF HIV-5 THEN BESTOBE 1440 ELSE IF 
NIV4 THEN BESTOBE 1560 ELSE IF «l¥-7 T 



A 230 IF «IV-B THE» BESTOBE 1800 ELSE IF NIV'9 THE» BESTO 
BE 1920 ELSE IF IIB-10 THE» BESTOBE 2040 ELSE IF Blï-ll 
THE» BESTOBE 2160 ELSE IF NIV'12 THE» BESTOBE 2280 
240 FOB A=l TO 19:EC»<A,0>=I:ECB<A,11>>1:«£ÏT 
250 FOB A'1 TO 10:ECI(0,A1'1:ECB(19,A)=1:NEIT 

V 260 'IIHIDESSIN TABLEAU»!" 

• 270 FOB B=l TO 10:F0B A=l TO ISsBEAD ECB(A,B):IF ECBCA, 



>NC 

S, 

>OAN 
>LC\ 
>««\ 
>D»\ 

>LFS 



as, 

>F« 



>HI 



>HE\ 
>«E\ 

>Bjy 

>a.\ 

39 



B)O0 THEH ùSPRITE,AU,Bil6+24,SPR<ECB(A,B)) 

X260 ren:«En >b+\ 

\3Sli REÂD HBH:FQR tel TO HBfl:READ IM(A) , Y(HA), SPM(K) ,TïP >ZF 

(A),D(A):ùSPBITE t n(A)>4 l TH(A)iiet24,SPH(A):NEIT 
\300 BEAD BOHUSsREAD I,Y:Il=X:YWiREAD HBC,IH:1HK O.IH >BP\ 
S 310 ùSPRlTE,Ii4,Yii6+24,SPRl2):D=2:Dl=D >JG \ 

\320 '*ti**PBOG.PBIHClPAL*t«i >BF\ 

\330 IF IHKEY(GA)=Q THEH Di=D:II=I:Tl=T:D[fi£=-l:ïD=0:D=l >PG\K 

:GOSUB 610 
\340 IF IHKEYIDRXO THEH Dl=DiXi=X;Yl=T:DIRE=l:YD=0:D=2: >»\ 

GOSUB 610 
^350 IF IHKEÏiFE)=0 THEH IF QBJ=Q THEH SAUTM:GOSUB 750 >IA\ 
-s 360 IF IHKEY<FE)=0 THEH IF ÛBJ=2 THE* A=8:B=1:QUT 255,A >IH\ 
:OUT 256,B:E=ECfilX+l,Y*l):ECB(X+l,YH)=0:ùSPBITE,(I+l)i 
4,{M)H6t24,SPB(E)iF0B 8=10 TO 15:S0UHD 1,0,20,7,0,0, 
B:HEIT:QUT 2S6,2:G0SUB 900:OBJ=0 
^370 IF IHŒY(FE)*0 THEH IF OBJ=i THEH LASEB=1 :DL=D1BE:I >HJ^ 



\600 '= TEST COLLISIOHS ===== >K\ 

^610 IF ECB(I+DIRE,Y*YD)=Q OB ECH(X+DIRE,YtYD)=lÛ THEH I ><3J\ 
XtDIEE:Y=Y+YD:GOTO 700 

620 IF ECB(I«DIR£,Y+YD)=U THEH LÛ=3:A=3B:B=4:I=CLE:GÛS >8A \ 
UB B90:CLE=CLEU:X=X+DlRE:Y=Y+YD:ECR(X,Y)=0:ùSPRITE,I*4 
,Y>16»24,SPRI11):PRIHT CHR*(7>;:L0=3:A=35:B=4: l=CLE:GOS 
UB 890: GOTO 700 

i30 IF ECR(I+DIRE,YtYDX12 THEH IF CL£>0 THEH LÛ=3:A=35 >WE\ 
B=4:I=CLE:G0SUB B90;CLE=CLE-i:X=HDIBE:Y=Y*YD:ECI!(X,Y) 
0:ùSPfilTE,H4,YM6+24,SPB<12hSQlM) 1,0,15, 12, Q,0,15:L 
l=3:A=35:B=4:l=CLE:G0SUB B90:G0T0 700 
\640 IF ECR(I+D!RE,Y+YD)=15 THEH TAA=TAAU;X=XM)IRE:Y=Yt >ÏU ,. 
YD:ECR(I ( Y>=0:ùSPRlTE,Xi4,Yil6t24,SPRll5):L0=7:l=SC:A=2 * 

:B=24:G0SUB 890:SC=SCtl00:A=2:f=SC:GQSUB 890: IF TAA=HBC 
THEH NIV=N1V+1eG0SUB 900:GOTO 150 ELSE GOTO 700 
S 650 IF ECB(ItD[BE,YtYD)=14 THEH IF OBJ=0 THEH 0BJ=2:X=I >YE \ 
♦DIBE:Y=Y+YD:ECE(I,Y)=0:ùSPR]TE,Ii4,YiiË+24,SPBll4):H=l 
4:G0SUB 900: GOTO 700 
|V660 IF ECR(X*DIEE,Y+YDX13 THEH IF 0BJ=O THEH 0BJ=1:X=I >YB y 



L=I+DlflE:YL=Y:ùSPBITE,XLi4,YLil6*24,SPR<2O):G0SUB 900:0 
BJ=0 
> 380 IF IHKEY(HA)=0 THEH IF ECR(X,Y)=10 THEH D1=D:I1=I:Y >RV\ 
l=Y:DlEE=Q:iriJ=-l:I>=3jG0SUB 610 

'3S0 IF IHKEY(BA)=0 THEH IF ECNX,Mï=10 THEH Dl=DiXl=I )TÏ\ SJÛ IF ECB(Ï+DIBE.Ï+YDK13 THEH D=D1:BETUBN 

:Y1=Y:DIBE=0:YD=1:D=3:GOSUB 610 
^|*o3)IF LASEfi=l THEH IF ECR(IL+DL,YL)=Q OB ECRilL+DL, ÏL) >DG 

=10 THEH ùSPBITE,XL>4 l YLtl6»24,SPB(20):XL=IL*DL:ùSPBlTE 

,XLi4,YLil6'Z4,SPB(20):SOUNO 1,0,5,7,0,0,7 ELSE ÙSPBITE 

,XLU,YLU6t24,SPB(20] :LASEB=0 
V*io | |=0fPEBI (IHKEYI) X)L\ 

V 420 IF l*="P« THEH BORDES 4:CAU. 4BB06:BQEDEB 



"S.430 IF U*"S" THEH SPEED IHK 7,7:B0RDEB 15,24:B=24:LO=5 >GF\ 
:I=VIE:A=22;G0SUB B90:lUE*VIE-l:B=24:LD=Si l=tME:A=22:G0 
SUB 890:S0U» 1, 1000,SQ,7;FOR A=l TO 3OO:HÉIT:B0BDER 0: 
IF V1E=0 THEH 3150 
V*« »» KP.EHEHf ==*?======= >Rj\ 

S 450 FOR A=l TO HBH >LG\ 

"^460 IF LASEfi=l THEH IF IH(A)=IL THEH IF YH(A)=YL THEH D )DA\ 

<A)=0 
"V470 IF IH(A)=I THEH IF YHIA)=T THEH H=A:SPEED IHK 7,7:B )F>\ 
OBDES 15,24:IHK 0,24,15:B=24:L0=5:l=VIE:A=22:GOSUB 890: 
lfIE=VlE-l:B=24:U)=5:l»VlE:A*22:G0SUB 6B0:A=H:S0UND 1,10 
00,50,7:FOB N TO 300 :HEIT: BORDER 0:IHJC 0, IN: IF V1E=0 
THEH 3150 
\4flO IF HP(A)=1 THEH GOSUS 800 >U)\ 

490 IF TYPUX2 THEH GOSUB 830 >XW ^ 

N 500 !F LASERM THEH IF IH(A)=IL THEH IF YH(A)=YL THEH D >DV \ 

(A)=0 
\510 IF IH<AXX THEH IF YH(A)=Y THEH H=A:SPEED IHK 7,7;B >DE\ 
ORDER 15,24:1HK 0,24,15:B=24:L0=5: ]=VIE:A=22:G0SUB 890: 
ÏIE=VlE-l:B=24:L0ï5:hl/lE:A=22:G0SUB 890:A=H:S0UHD 1,10 
00,50, 7:F0B 1=1 TO 300:HEXT:B0BDER 0: IHK 0,1H:IF V1E=0 
THEH 3150 ELSE 480 
"N.520 HEIT N >EC 

\ 530 IF SAUT=0 THEH GOTO 330 \ >UF 

^540 '= SAUT =i===========^= \>SX 

\550 IF IS=1 THEH D1=D:GOTO 580 N >XH 

N 560 IF IS=2 THEH YD=-YD:GOTO 580 N >ZT 

N 570 IF XS=4 THEH DIEE=0:YD=0:SAUT-0 \ >DT 

\580 I1=I:Y1=Y:G0SUB 610 \ >TH 

\590 IS=XS+1:G0T0 450 



4DlfiE:Y=Y+YD:ECB(X,Y)=0:ùSPfilTE,IU,Y«16t24,SPE(13>:K=l 

:GOSUB 900:G0T0 700 

>nt\ 

5U680 IF EC8(X+DIEE,Y*YDX15 THEH I=HD1BE:Y=Y+YD:GÛT0 70 >CT\ 
' 

690 IF ECR(I*DIBE,Y+YD)=19 THEH I=I+D1RE:Y=Y+YD:ECB(X,Y >CL , 
>=0:ÙSPRITE,H4 I Y«16+24,SPRU9):GQSUB 910:GOT0 700 
700 ùSPR[TE,Il»4,(Yl+16)ïl6+24,SPR(DlhùSPRITE,I»4,YH6 >XL\ 
24,SPR(D):IF SAUT=1 THEH RETUBH 

>Rj\ 



>NH\'\7lO '= CHUTE'" 



m\ 

>TJ\ 
>RJ^ 
>FK\ 
)BF\ 
>TG \ 



S 720 IF ECR(I,Y+1)=Q THEH I1=I:Y1=T:D1=D:Y=Y+1:G0T0 700 >ZZ \ 
,730 IF ECR(X,Y+1)<11 THEH BETURH ELSE D1=D:X1=I:Ï1=Y:DI >BH \ 

RE=0:YD=1:GOSUB 610 
S. 740 RETIffiN 
V750 IF IHK£Y(GA)=0 THEH Dl=D:DiBE=-l;D=l:GOTO 780 

760 IF IHKEY(Dfi)=0 THEH D1=D:DIRE=1:D=2:GOTO 780 

770 DIEE=0:D1=D 
N780 IS=0:YO=-1:EETURH 
\790 '= DEP.EHEHIS (2) "*=== 
.800 IF ECR(IH(A)+D(A),YH(A))=0 THEH ùSPRITE,IH(A)t4,YH( >2£\ 

A)H6+24,SPH{A):XH(A)=XH(A)+D(A):ùSPBITE,IH(A)i4,YHtA)i 

16*24, SPIKAhRETURH 
V810 IF ECR<XH(A)+D(A),YH(A)»9 THEH <lSPR1TE,XH(A)i4,YH< >EC \ 

A)H6+24,SPH{A):IH(AJ=XHlA)tD(A):ùSPBITE,IH(AH4,Yn(A)t 

16t24,SPn(A):RETURH ELSE D(A)=-D(A) 

820 RETURH >ZF\ 

K830 IF ECR(XH<A),YH(A)+D<A)>=0 THEH ù5PRITE,Xn(A)i4,YH( >W\ 

A)«16+24,SPH(A):YM(A)=YHIA)+D(A)iùSPRlTE,IHa)»4,YH!A)» 

16*24, SPH( A): BETURH 
^840 IF ECB(XH(A) t lH(A)*D(A)»9 THEH bSPR!TE,XH(A)i4,YH( >EH\ 

A)*16+24,SPH(A):YH(A)=YH{A)+DIA):ÙSPBITE,IH(A}i4,YH(A)i 

lGf24,SPH(A):BETURH ELSE D(A)=-D(A) 

850 BETURH >U\ 

AFFICHAGE ^=="="=== >TE \ 

.670 U=i:POKE 19028, 8 : POKE &9030,2:CALL 49067: FOR 1=A TO >BP <y 
A+LEH(A*)-1:1F HIDI{A*,B,1X>» " THEH ÙSPBITE, li2,B, 45 

F40:ùSPBm,U2,B,LE<ASC<H]Di<At l U,l))-64hU=U+l ELSE H 

=y+i 
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HEXT:POIŒ 4902B, 16:P0KE 49030,4:CALL 49067:RETURH )YÏ \ 
\>PI X e90 Ht=STB*(n:A*=STElHG*(LO-LEH(M)*l,"0 , XRIGHTt(HI,L >CE <. 




EMMMIllMlFWE H02B,8:POH W30,2:CALL A9067:F0B 
M TO »»L£H<»»-li4SPIITE,!«2,B,t5F40!ÙSPiIT£,H2,l,ai 
<V«L!H1D»(»»,S, l)I):U"Uil:»EIT:POKE 1902B,16:PDKE 19030 
.AiCAIJ. t9067:BET0BI 
Tfjfo lF 0BJO0 TU» POKE W021,15:ÙSPIITE,6,1,SP1(HI;POK >IM 
T!â02B,l6:BErUB! OSE BETUUI 

.'910 IF KH«IS=1 THES SAW=1:UK«TE 5,5:FtlHT STSIIKtllO, >W 
M3>:A=9iB=32;AI'"SAllT";60SUB 670:S0SUB TSOilETUlS "** 

920 IF B0WS=2 TŒ* ltE=G»ia'«:M-«£:l0aTE S,5:P!IHT >H 
ST£l«Stll0,143>:»=9:B=32:«4="Cl»ll»liDES linE>SEES':C0SU> ""- 
670:BETU8lt 

'930 IF HMJS'3 TUS LD-S:l'VIE;A-22:B=24ia>St* 8Ms»IE' >BE 
VIE<1:L0=5:MIE:A=22:B°24:S0SUB S90:UKATE 5,S:PilHT S ~-- 
TlllKt(IO,l*3):»=9;l=32l»l="»IE SUPPlflDMTAlIE'sSjSlIl 9 
70l«EIUBI 

,i MO IF BOWS-4 TttEN L0'?sl'SCs»'2sB«24:COSllB 8W:SOS» >IK 
2:Ul=7il=SC:».2;8=2«:G0S» 890:UKATE S.SsPSIHT STBIMGt ' " 
<10,143kA=9:B=32:A*= B SCOBE DOUBLE'iGOSUB 870:BETU8M 

\ 950 »« MUS TABLEAU! M==== S)IE 

X960DATA ,,,,,15 ,,,,,- N)TI 

X 970 DATA ,,,,4,4,4,4,4,4,4,4,4,4,,,, >»!) 

/ 9» DATA „,,,, 15,,,,, \ >TU 

JX 990 DATA 4,4,4,4,10,4,4,4,4,4,4,4,4,10,4,4,4,4 \>«l 

1000 DATA ,,,,10,,, 10,,,, \>K 

1010 DATA ,,,,10,,, ,15,15,,,, 10,,,, >Z9 

» 1020 DATA 4,10,4,4,4,4,4,4,4,4,4,4,4,4,4,4,10,4 \>L» 

103»OAT*,10 , ,10, >«« 

1040 DATA 15,10,,,,, ,,,,,10,15 VzU 

JL 1050 DATA 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 \>J« 

X 10BO DATA 3,10,3,15800,1, l,10,6,L5BCO,l,-l,10,9,l5ftCO,l >TB 
,1 

, 1070 DAT» 0,12,9,6,14 \>H. 

V 1090 DATA 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 VB 

X.108O DATA ,,,„,,, 5,,, \>TH 

JsUOO DATA ,,12,„„„„,,5„„ \>»D 

1110 DATA ,15,12,,,, 11,,, ,,,5 - >n 

> 1120 DATA 5,5,5,5,5,5,5,5,5,10,5,5,5,5,5,5,5,5 \ >ltl 
.* 1130 DATA 11,12,,,,, ,,,10 N)IT 

1140 DATA 15,12,,,,,, ,',10,,,, ,,,15, V2I 

> 1150 DATA 5,5,6,5,5,5,5,5,5,5,5,5,5,5,5,,, \ >« 

1160 DAT* 15,, 12,,,,,,,,,, .>■ 

1170 DATA 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 \>KF 

,1180 DATA 2,10,4,15000,1, 1,10,7,I£COO,1,-1 S >« 

> 1190 DATA 0,12,9,4,5 \>m 



\ 1200 DATA 
>< 1210 DATA 
1220 DATA 
X 1230 DATA 
>1240 DATA 
» 1250 DATA 
X 1260 DATA 

> 1270 DATA 
1280 DATA 

* 1290 DATA 
X 1300 DATA 
y, 1310 DATA 

> 1320 DATA 
X 1330 DATA 

* 1340 DATA 

* 1350 DATA 
1360 DATA 

> 1370 DATA 
-, 1390 DATA 
M 1390 DATA 

> 1400 DATA 

> 1410 DATA 

> 1420 DATA 
,1 

X 1430 DATA 
g 1440 DATA 

> 1450 DATA 
X 1460 DATA 
)4 1470 DATA 

1460 DATA 

1490 DATA 

v 1500 DATA 

A 1510 DATA 

1520 DATA 

> 1530 DATA 

> 1540 DATA 
1550 DATA 
Î561) DATA 

fi 1570 DATA 

* 1580 DATA 

> 1590 DATA 
X 1600 DATA 
X1610 DATA 

1620 DATA 
X 1630 DATA 

> 1840 DATA 

* 1650 DATA 
1660 DATA 

M 1670 DATA 

* 1680 DATA 
?.. 1690 DATA 

1700 DATA 

* 1710 DATA 
X 1720 DATA 

1730 DATA 
V1740 DATA 
X 1750 DATA 
X 1760 DATA 

1770 DATA 



,,12,,,,,,,,,,,,,,, 

15,, 12,, ,,,15,,, 

6,6,6,6,6,6,6,6,,, ,,„6„, 

15,12, H,,,,,,, 

6,6,6,6,6,6,6,6,6,6,10,6,6,6,6,6,6,6 

11,, ,,10 12,19, 

,,,,, 10,, ,,,12, 15, 

,,,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 

,,,,11,,,,12,15, 

6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6 
2, 10,4, 55640,1, 1,10,7,55040, 1,-1 
2,10,9,5,20 

7 , 19,„„7 

7,,„„„7,„„„„7 

7, 14,7,,, ,,,,,15,7 

7,7,7,7,10,7,7,7,7,7,7,7,7,7,7,7,7,7 

15, 12,, ,10 

,12,, ,10,, ,,,,,,,,,,, 
7,7,7,7,7,10,7,7,7,7,7,7,7,7,7,7,7,7 
,,,,,10,,, ,,,,,,7,15,7,7 

,U„„10 „, ,12,, 15,7 

7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7 
3, 15, 3,S5BCO,1,1,10,6,45BCO, 1,-1,10,9, 

3,10,9,4,11 
8,6,8,6,8,8,8,8,6,6,8,8,8,6,8,8,6,6 

,,,,,,,,,, 12,15 

,,14,, 14 12, 

6,6,8,8,6,8,8,6,8,8,6,6,10,8,6,8,8,8 

,„«,,, 10,, ,12,, 

11,, ,8,, ,13, ,,,,,10, ,,12, ,15 
8,8,8,8,6,10,0,8,8,8,6,8,8,8,8,6,8,8 

,11,, 8,, 10 12,, 

15, 15, 12,, ,10,11 ,, 11, ,12,, 15 

8,6,6,8,8,6,8,8,8,8,8,8,8,8,6,8,8,8 
2,iS,3,S5BC0,l,l,!0,6,«C40,i,-l 
0,10,9,5,15 
,,,,,,,9,9,9,9,9,9,9,9,9,9,9 

,,,15,, ,9 ,14 

9,,,, ,,,,,,,9,9 

,15,, ,9 , 9,, 15 

,,,9,9,9,9,9,9,9,10,9,9,9,0,9,12,9 



,9,9,, 



,10,, 



,9,9,, , 10 9„ 

10,,,, ,,,,,,10 9,, 

10 ,,11,, 10,, ,,,9, 15, 

9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 

2,1, 3,t5C00, 2,1, 3,2, 55000,2,-1 

0,10,9,4,3 

4,, 4,, 4„ 4,, 4,, 4,, 4,, 4, ,4, 

4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 

5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 

,,,,5,,,5,,,S,,,5,,,S, 

11,, ,,,,,5,, 12, 

,10,, ,12, 

,10,,, 5,, ,12, 

,10,, ,5,, 15,5,, 15,5,, 15,5,, 15,5, 15 
5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 
4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 



\>m 
\m 
\>aï 

\>E 
\>LL 
\>ZZ 

\m 
\>ra 

\>K 

\va 

V>B 
NMD 
\>9C 
\>ÏT 
VU 
N >L£ 
\>IH 
\>«L 
\>UC 

\>n. 

\>A6 

\ia 

55600,1 >»C 

\MB 
\>KP 

\m 
\>m 

\>LD 

\>u 
\>c» 
\>u 

\>TP 

\>a 

^>KP 
«>6« 
,>» 
\>CÏ 

\>u 

\>WI 
\>ÏB 

\>n 

\>n 

..>H 
\>IK 
'>>A« 
VMS 
\>BI 

\vm 

\>AL 
\ >K 
\X£ 
>K 
\>«D 
S M. 

\>œ 
\>n> 
V» 

\>JB 
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X1780 DAT* 2,5,5,15600,2,1,11,5,115600,2,-1 
1790 DATA 0,1,8,5,1 
X 1800 DATA ,,,,, ,,,14,,,,,,,,, 

M 1810 DATA 15, ,,,,,15,,,, 

y 1820 DATA , ,,U, , ,5,5,5,5,5,5,,,,,, 
V1830 DATA , ,,,,5,4,4,12,*, 4,4,5,,,,, 
>;'1840 DATA , ,, ,5,4,,, , ,15, ,4,5, , , , 
>1850 DATA ,, ,5,4,12,, ,,,,10,, 4,5,,, 
> 1860 DATA ,,5,4, ,12,,,, 15, ,10,,, 4,5,11, 

J»1B70 DATA 14,5,4, ,15, 12 10, ,,,4,5, 

y 1880 DATA 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5 
y 1890 DATA 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 

> 1900 DATA 2,3,3,15040,1,1,8,7,15040,2,-1 

> 1910 DATA 0,2,7,5,1 

X1920 DATA ,7,15, ,,10 ,,10,,,, 7, 

y 1930 DATA ,7,,,, 10,,,,,,, 10,,,, 7, 

50 1940 DATA ,7,8,8,8,10, 10,0,8,6,7, 

*1950 DATA ,7,, ,,10,, ,,15, ,,10,,,, 7, 
■«..i960 DATA ,7, ,,,10,6,6,8,6,6,6,10,,, ,7, 
X1970 DATA ,7, ,15, ,10,, 10,, 15, ,7, 

1980 DATA 8,7, 6, 8,8, 10,, ,,,,,10, 8,8, 8,7, 8 
y\ 1990 DATA ,7,,,,10 M ,,15, M 10,,,,7, 

2000 DATA 8,8,8,8,8,8,8,8,8,8,8,6,6,8,8,6,8,8 

* 2010 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 
2020 DATA 2,9,4,15000,1,-1,5,6,15000,1,1 
2030 DATA 0,9,8,5,11 

^.2040 DATA ,,,,14,,, 14,,,,,,,,,, 

> 2050 DATA , 19, „,,,,,,„,,,, , 

2060 DATA 8,6,6,8,10,8,8,8,8,8,6,8,8,6,6,8,8,8 
>2070 DATA 15,, 7,, 10,,,,, ,,,,,, 7, 15, 

*2080 DATA 8,8,8, ,10, ,,,,,8,8,3 

./2090 DATA ,,,,10, ,,, ,15,,,,,, , , 

> 2100 DATA ,,,,10,,,,, ,,,,,, 14,, 

^x 2110 DATA ,,,,10, ,12, 12, 12,12,,,,,, 8,8,8 

> 2120 DATA ,14,,, iO,,12,15,,12„ M ,,12,11,11 
£ 2130 DATA 8,8,6,8,8,6,8,8,8,8,8,8,8,8,6,8,8,8 
y. 2140 DATA 1,9,7,15040,1,-1 

A 2150 DATA 4,3,9,4,11 

2160 DATA 9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9 

* 2170 DATA H,,,,,,,,,,,,,,,,, 

x 2180 DATA 7,,,,15, M ,,,,15,,,,,,7 

> 2190 DATA 7,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,10,7 
>2200 DATA 7,,,, ,,,,,,,,, ,,,10,7 

y 2210 DATA 7, ,,,,,,8,8,8,8,6, ,,,,10,7 
>■ 2220 DATA 7,,, ,,,,,,,,,, ,15, ,10, 7 
#2230 DATA 7,5,5,5,5,5,5,,,, , ,5,5,5,5,5,7 
X2240 DATA 15,12,,,,, ,,,15,,, , ,,, ,7 

> 2250 DATA 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 

M 2260 DATA 3,6, 2, 15BC0,2,1, 13, 2,15000,2, 1,10, 9, 15040, 

>: 2270 DATA 0,3,9,5,2 
X 2280 DATA 11,,,,, ,,,,,,, ,,,10, , 
■*2290 DATA 8,8,6,10,8,8,,,,,, , ,,,10,, 
^2300 DATA , ,,10, ,,,,,,,,, ,,10,, 15 
3*2310 DATA ,14,, 10, ,8,8, 8,8,8,, 6, 8,8,8,10, 8,8 
\2320 DATA B, 10, 8,8, 8,8,9, 9,9,8,, ,,,,10,12, 15 
X2330 DATA ,10,,, ,8,9,15,9,8, ,,,, ,10,8,8 
^ 2340 DATA , 10, ,14,, 6,8,8,8,8, ,,, ,,10, , 

> 2350 DATA 10,8,8,6,6,,, 19,, ,10,15, 
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-ÏFB 

\>LF 
\>UC 

\>«u 

\>zv 

^ )AE 
V >XB 

\>m 

\>DJ 

\>w 

\>KP 

\>;e 
\>ee 
vlz 

\>ZK 

\>n 

\>DV 
\>ZH 
\>DJ 
\>BN 
\>F1 
N>ZT 
\>KG 
\>KC 
\>FJ 
\>KT 
\>WI1 
\>UK 
>>L2 
\>ZB 

\>ai 
\>yp 

VWE 
\>DA 
\>GF 
\>tt 
k>RH 
^> HO 
^>KJ 
\>UE 
\>IB 
\>LU 

yw 

\>AW 

yin 

\>£E 

\>Ï2 

\>JV 

1, 1 >WJ 

\>U) 

\>«. 

\>AQ 
\>IA 
\>JQ 
\>JG 
\>DG 
\>CK 
\ >DA 



X2360 DATA 10,,,13,,,,14,,,,8,8,6,8,8,8,8 \ >EF 

#2370 DATA 8,8,8,8,8,8,8,8,8,8,6,9,9,9,9,9,9,9 \ >KA 

2360 DATA 2,6,3,15880,1,1,10,9,15660,1,-1 \>fC 

2390 DATA 1,3,9,4,15 \ >H8 

JK 2400 'iiiitiPBESEHTATlOHnKii > >U 

' ^24ÏÔT P0KE 1B02B,1S:PQKE 19030, 4Û:N0DE 0:PAPEB 0:CL5:B0B ,>GU 

DÉ~8:iiSPBITE,20,150,15F40:FOfi A=150 TO 8 STEP -8:ÙSPBI 

TE,20,A-6,t5F40:ù5PE!TE,20,A,15F40:NEXT:UINDOU 10,1,20, 

5,25:PAPER 5:CLS:P0KE 1902B,16:PQKE 19030,4:CALL 19067 

>2420 FOR A=8 TO 76 STEP 8:ùSPRlTE,A,64,159O0:ùSPRITE,A, >AP 

i, 15800 : ÙSPR 1 TE, A-4 , 90 , 158C0 : HEIT 

A 2430 RESTORE 2480 #£\ 

K . 2440 A=15:B=100:A»='J 0ÏST1CK";G0SUB 87Q:B=124:A*= , K ET >CH 

BOA£D":GOSUB 870:A=5:8=180:A*='ECR1T PAB STEPHANE DE CA "* " 

HEVA«:GOSUB 670;A-5:B=1&8:A*= , C0PTB1GHT DEÇA SfJFTU 

ABE'sGOSUB 870:L0=4:IM989:A=15:B=168:G0SUB 690 

2450 l*=UPPEB*(IHKET») >BJ w 

2460 READ At,BI,C»:lF Cl<>'-1« THFJ SOUND l.VÀLCftAlt >cf 

.VALCt'+BD.ÏAH »!■+«) ELSE BESTOBE 2480 

>ê 2470 IF !»='K" THEN HA=0:BA=2:GA=8:Dfi=l:FE=9:fiETURN ELS >UA* 

E IF 1*=-J- THFJ HA=72:BA=73:GA=74:DR=75:FE'76:fiETUBH E "* 

LSE 2450 

\2480 DATA 3F4,A,5,777,A,5,3F4,A,5 \>ZF 

\ 2490 DATA 777,A 1 5,3F4,A,5,777,A,5 \>ZÏ 

\ 2500 DATA 3F4,A,5,777,A,5,3F4,A,5 \>ZT 

>2510 DATA 777,A,5,6A6,A,5,SEC,A,5 \>Zfi 

S2520 DATA 597,A,5,4FB,A,5,470,A,5 \>ZI 

\2530 DATA 3F4,A,5,777,A,5,6A6,A,5 \>ZB 

\ 2540 DATA 5EC,A,5,597,A,5,4FB,A,S \>ZL 

% 2550 DATA 470,A,5,3F4,A,5,777,A,5 V >ZJ 

N2560 DATA 6A6,A,5,5E0,A,5,597,A,5 \>ZI 

•\2570 DATA 4FB,A,5,470,A,5,3F4,A,5 \>ZL 

\2580 DATA 777,A,5,6A6,A,S,5E0,A,5 \>Z2 

\2590 DATA 597,A,5,4FB,A,5,470,A,5 \>ZE 

^2600 DATA 3F4,A,5,777,A,5,6A6,A,5 \>Z2 

\261Q DATA 5E0,A,5,597,A,5,4FB,A,5 \>ZJ 

« 2620 DATA 470,A,5,3F4,A,5,777,A,5 \>K 

^2630 DATA 6A6,A,5,3BB,19,5,1DD,50,5 \>BB 

^2640 DATA FD,50,5,1DD,14,5,FD,14,5 \>AV 

N2650DATA 13E,28,5, 17B,28,5,1DD,14,5 \ >BU 

■s, 2660 DATA 17B,14,5,1DD,50,5,13E,50,5 \>BJ 

- 2670 DATA EE,F,5,D4,F,5,BD,F,5 \ >XG 

2680 DATA 7E,F,5,8E,F,5,EE,1E,5 \>TE 

-■,.2690 DATA 8E,1E,5,7E,2B,5,77,F,5 V, >ÏZ 

\2700 DATA 6A,F,5,5E,F,5,3F,F,5 \>IT 

iv 2710 DATA 47,F,5,77.1E,5,47,1E,5 \>ÏB 

\ 2720 DATA 3F,28,5,3B,F,S,35,F,5 \>IW 

v, 2730 DATA 2F,F,5,1F,F,5,23,F,5 \>«F 

V2740 DATA 3B,1E,5,23,1E,5,1F,28,5 \>2A 

^,.2750 DATA 5EC,32,5,l,3,O,5E0,32,5 \ >ZI 

^2760 DATA 1,3,0,5EC,32,5,EE,19,5 \>ïy 

■ 2770 DATA 38B,50,5, 1FA,50,5,3BB, 14,5 \>CF 

V2780 DATA 1FA,14,5,27D,28,5,2F6,28,5 \>BF 

V2790 DATA 3BB,14,5,2F6,14,5,38B,50,5 \>BF 

\,2800 DATA 27D,50,5,1DD,19,5,77,50,5 \>AU 

%2810 DATA 6A,50,5,77,50,5,6A,50,5 \ >ÏB 

-* 2820 DATA 5E,50,5,59,50,5,5E,50,5 \ >U 

-. 2830 DATA 59, 50, 5, 4F, 50, 5, 47, 50, 5 \ >«J 

>2840 DATA 4F, 50, 5, 47,50, 5,3F, 50, 5 \ >ÏG 



,*2850 DATA 1,3,0, 77,5Û,5,3F,50,5 
N, 2660 DATA 77, 14,5,3F, 14, 5, 4F, 2B.5 
V2B7O0ATA 5E,2B,5,77,14,5,5E,H,5 
X. 2B80 DATA 77, 50,5, 4F, 50,5, 77, 18,5 
-^ 2890 DATA 1DD,F,S,1A9,F,5,1DD,F,5 
V.2900 DATA 1A9,F,5,FD,F,5,FD,F,5 
». 2910 DATA 1DD,F,5,1A9,F,5,17B,F,5 
%2920 DATA 165,F,5,13E,F,5 ( 11C,F,5 
X 2930 DATA FO,F,S,13E,F,5,165,F,5 
>2940 DATA 17B,F.5>1A9,F,5,1DD,F,5 
V 2950 DATA D4,F,5,B2,F,5,D4,F,5 
%2960 DATA 9F,F,5,B2,F,5,B2,F,5 
X,2970 DATA 3F,F,5,77,F,5,6A,F,5 
n. 2980 DATA 5e,F,5,4F,F,5,5E,F,5 
"S 2990 DATA 6A,F,5,3F,F,5,5Û,F,5 
S*. 3000 DATA Sfl,F,5,ll,F,3,8E0,X,3 
V3010 DATA 1,3,-1,0,0,00,0,0 
"s, 3020 DATA F0,50, 5,100,14, 5, FD,14, 5 
X3030 DATA I3£,2fl, 5, 178,28,5.100,14,5 
V3040 DATA 17B,U,5,1DD,50,5,13E,50,5 

3050 DATA EE,F,5,D4,F,5,BD,F,5 
V3060 DATA 7E,F,5,8E r F,5,EE,lE,5 
V3O70 DATA 8£, 1Ë,5,7E,28,5,77,F,5 
S 3060 DATA 6A,F,5,5E,F,5,3F,F,5 
X3Q90 DATA 47,F,5,77,1E,5,47,1E,S 
,,3100 DATA 3F, 28, 5, 3B, F, 5,35, F, 5 



\>tt 
\>ZJ 
\>ZL 
\>TH 
S>AB 
VïM 

\m 

\>2T 

v\ >ÎT 
\>ZP 
\>IU 
\>IT 
V>ÏP 

\m 
\>u 

vyp 

\>TJ 
\>AK 
\>BL 

\>BB 
\>I2 

\>ïi 

\>YB 
\>ÏU 



3110 DATA 2F,F,5,1F,F,5,23,F,5 

3120 DATA 3B,lE,5,23,lE,5,lF,2fl,5 

3130 DATA 5EC.32,5,1,3,0,5EC,32,5 

3140 DATA -1,0,0,0,0,00,0,0 

3150 SOUND 1, 1000,50, 12:PAPE1 S:CLS:A=15:B= 

OVEBVGOSUB B70:FQR A=l TO 1000:HEIT:BUN 



\>ZT 
>)ZP 
\>TJ 



'b LISTING 2 
'= GRAPHISMES 



N 10 DEB=b5800:LQMG^999:H0n$=*KSISTAIl.BlN':Llfi=100 

H 20 FOR A=fc5800 TO 15800*1099 STEP 16:S0H=O:F0B B=0 TO 15:READ 

AlîPOKE AtB,ÏAL('l. , Ht):S0H=S0H»VALCI. , *A$):NEÏT:LIG=LfGH0:PB 

1NT LIG:READ A*: IF SÛMOVAU ■*"♦ A» THEN PRlNTERtEUR EN LIGNE 

*;LIG:END FXSE NFJT 

30 SAVE NOH*,B,DEB,LONG:END 
^100 DATA F0,F0,F0,A0,50,98.3O, FO, 50,08.30, 70.E4.3O, 70, 70,0934 
vilO DATA 50^0,60,70,50,96,30,70,00^0^0^0,50,08,08,08,0940 
M20 DATA 50, 58,08,08, 50,58,56,D8,50,58,FO, 58,50, FO,70,F0,O8C0 
M30 DATA 50,BC,B4, 78,50, FC,3C,7B,5O,FO,B4,78,F0,F0,FO,FO,0A64 
-.140 DATA 50,F0,F0,F0,F0,3O,64,AO,B0,3O,E4,A0,B0,BO,3O,D8,0A10 
\ 150 DATA B0,70,FO,A0,B0,3O,64,A0,5O,F0,F0,00,E4,E4,E4,AO,0AlO 



V 160 DATA E4, 
v 170 DATA B4, 
\ 160 DATA 50, 
\ 190 DATA F0, 
« 200 DATA E4, 
. 210 DATA 34, 

220 DATA FO, 
N 230 DATA FO, 
S 240 DATA FO, 
X250 DATA FO, 

260 DATA 50, 
X270 DATA B4, 

- 280 DATA B4, 
s 290 DATA B4, 

. 300 DATA CC, 

V 310 DATA F3, 
\320 DATA 5B, 
N 330 DATA 00, 
X340 DATA B3, 
X350 DATA 83, 
X 360 DATA 83 
X 370 DATA 83, 
X.380 DATA OC, 
N -,390 DATA 4C, 
\400 DATA OC, 
V410 DATA CC, 

420 DATA CO, 
\430 DATA CO, 

V 440 DATA CO. 
S 450 DATA CO, 
N 460 DATA 10. 

> 470 DATA 60, 

V 480 DATA 10. 

X490DATA80, 

\ SOO DATA 00 

X 510 DATA 60, 

520 DATA 00, 

\S30 DATA 00, 

X. 540 DATA C3, 

X 550 DATA 8C, 

560 DATA 8C. 

v 570 DATA 6C, 

"S 580 DATA 50, 

X 590 DATA 50, 

S. 600 DATA 54, 

X 610 DATA 54, 

* 620 DATA 00, 

630 DATA 00, 

640 DATA PC, 

- 650 DATA FC, 
-, 660 DATA 00, 
X670 DATA A4, 
- . 680 DATA A4. 

- ■ 690 DATA A4, 
X700 DATA 00, 

.710 DATA D2, 

720 DATA 83, 

> 730 DATA 00, 

V 740 DATA 00, 
44 



E4,A4,A0,E4,A4,A4 


A0,A4,F0 


A4 


AO, 


78,7C,A0,B4,3C,FC 


A0,B4,78 


FO 


AO, 


F0,F0,AQ,FO,F0,FO 


FO.FO.FO 


FO 


FO, 


FO,F0,F0,FO,FO,F0 


F0,5O,F0 


FO 


AO, 


E4,58,D8,A4,E4,S8 


SB, FO.CC 


6C 


FO, 


3C,3C,F8,B4,F6,3C 


FB,B4,F8 


84 


FB, 


F0,F0,F0,3C,3C,29 


D2,BC.3C 


3C 


52, 


F0,FO,F0,28,D2,3C 


3C,3C,52 


BC 




F0,FO,FO,3C,3C,29 


D2,BC,3C 


3C 


52, 


F0,FO,FO,29,D2,3C 


3C,X,52 


BC 




F0.FO,AO,B4,3C,3C 


76,64,96 


3C 


FB. 


16,3C,FB,B4,3C,7C 


F8,B4,3C 


3C 


FB, 


3C,3C,F8,B4,3C,7C 


F8.B4.3C 


3C 


FB, 


3C,K,F8,B4,7C,7C 


F8.B4.FC 


FC 


FB, 


CC, CC.CC, 9B, 30,88 


30,F0,F0 


FO 


FO, 


F3,F2,F3,F3,F3,F3 


F3,F3,F3 


F3 


F3, 


51,F3,F3,51,51,A7 


F3,05,51 


A2 


50, 


05, A2, 05,00,05, A2 


00,00,00 


OA 


00, 


16,7C,F8,83,3C,FC 


FO.83,16 


7C 


FB, 


16,7C,FB,B3,3C,FC 


F0,83,16 


7C 


F8, 


16,7C,F8,83,3C,FC 


F0,83,16 


7C 


F8, 


16,7C,FB,83,3C,FC 


F0,83,16 


7C 


F6, 


OC,0C,0C,58,58,F0 


A4, OC.CC 


BC 


OC, 


8C,0C,0C,0C,58,FO 


0C,0C,E4 


8C 


A4, 


5S,OC,OC,FO,OC,F0 


OC, OC, A4 


BC 


56, 


8C,0C,0C,58,A4,CC 


BC.OC.OC 


FO 


A4, 


CO,CO,CQ,CQ,C0,C0 


CO.CO.CO 


CO 


60, 


CO,CO t C0,CO,C0,C0 


CO.CO.CÛ 


60 


C4, 


C0,CO,C0,CO,C4,C0 


C0,90,CQ 


CO 


CO, 


CO,90,C0,CO,CO,C0 


C0,C4,C0 


CO 


CO, 


80,10,80,10,80,10 


80,10,80 


10 


60, 


CO,C0,C0, 10,80,10 


80,10,80 


10 


BO, 


BO, 10,80, 10,80, 10 


80,10,80 


10 


80, 


CO,C0,C0, 10,80,10 


80,10,80 


10 


60, 


60.C0, 00,10,80, 10 


BO.60,00 


00 


60, 


00,00,60,60,00,00 


60,10,80 


10 


80, 


10,60,00,00, 10, BO 


00,00,10 


80 


00, 


10,80,00,00,60,80 


00,00,10 


BO 


00, 


C3,C3,C3,C3,C3,C3 


C3,C3,8C 


OC 


C3, 


OC,A4,OC,8C,0C,A4 


0C,8C,A4 


A4 


A4, 


A4,A4,A4,8C,A4,A4 


A4,8C,0C 


A4 


A4, 


A4,A4,A4,8C,A4,0C 


A4,8C,A4 


A4 


A4, 


00,00, 00,54, AO, 00 


00,54,AO 


00 


00, 


AO,OÛ,00,54,AO,00 


00,54,AO 


00 


00, 


FO.OO, 00,54, AO.AO 


00,54,F0 


AO 


AO, 


FO,F0,AO,50,F4,F8 


AO.OO.FC 


FC 


AO, 


80,00,00,00,40,00 


00,40,50 


00 


00, 


OO,AÛ,OO,O0,00,A0 


00,00,FC 


F6 


00, 


F0,FO,F0,FC,F0,F0 


F0.FC.FO 


FO 


FO, 


F0,FO,FO,FC,FO,F0 


F0,54,F8 


FO 


AO, 


FO.FO.OO, 50, OC, OC 


A0.A4.4C 


BC 


58, 


9B,64,58,A4,98,64 


5B.A4.C8 


64 


58, 


C8.C4,58,A4,C8,C4 


58.A4.C9 


C4 


58, 


C8,C6,58,A4,4C,BC 


58,50,0c 


OC 


AO,C 


96,78,00,41,16,70 


A0,B3,3C 


3C 


FB, 


B4,3C,FO,50,FO,78 


A0,83,3C 


X 


FB,f 


3C,B4,F8, 83,78,84 


F8,41,16 


7C 


AO, 


FO.FO.OO, 00,96,78 


00,00,96 


78 


00, ( 


FO,F3,00,50,C3,C3 


A2,E1,D2 


El 


03, 



BO.FO.AO, 
FO,F0,F0, 
FO.FO.FO, 
CC,CC,D6, 
FO.FO.FO, 
FO.FO.FO, 
,3C,3C,7B, 
78,FC,3C, 
,3C,3C,7B, 
78,FC,3C, 
.16.7C.FB, 
3C,7C,FB, 
3C7C.FB, 
FO.FO.AO, 
.Fl.FO.Fl, 
5B,F3,F3, 
,51,A2,05 
00,OA,00, 
,3C,FC,F0, 
3C,FC,F0, 
,3C,FC,F0. 
3C,FC,F0, 
,FO,A4,F0. 
0C,A4,0C, 
,58.F0,A4. 
OC,OC,OC, 
,C8,C0,C0. 
C0,CO,CO, 
XO.CO.CO. 
CQ,CO,CO, 
,60,10,60. 
80,10,80, 
,60,10,80. 
80,10,80, 
,00,00,60. 
60,CO,00, 
,10,80,00. 

co,ao,oo, 

OC, A4, 49, 
A4, A4, OC, 
, A4, A4, A4, 
C3.C3.C3, 
AO.QO.OO, 
AO.OO.QQ, 
FO.FO.AO, 
OO.FC.OO, 
,80,A0,OO, 
F8,F0,AO, 
FO.FO.FO, 
FC,FB,O0, 
98,64,58, 
C8.C4.58, 
Câ,C6,58, 
FO.FO.OO, 
3C.3C.F6, 
3C.B4.F8, 
96,78,00, 
41,A0,00, 
D2.E1.C3, 



S750 DATA E1,D2,E9,D3,50,C3,C3,A2,00,F1,F3,00,00,A5,5B,00,08CB 

\760 DATA 50,0F,0F,A2,A5,0F,0F,5B,A5,A5,5B 1 5B,A5,A5,5B,58,062E 

\770 DATA 50,0F,OF,A2,50,5A,A7,A2,50,5A,A7,A2,F0,Fl,F3,F3,08BD 

\7B0 DATA 80, 00,00,40, Q4,00,00,Oe,00,QC,OC,00,04,CO,C0.08,0270 

m DATA 58,D0,DO,64,58,FO,FO,A4,58,FO,F0,A4,4B,EO,E0,A4,0AE0 

\B00 DATA 04,CO,C0,08,0B,OC,OC,04,OB,00,0O,Q4.Q&,O8,04,04,01M 

\B10 DATA OC.OO.OO.OC.OB, 04, 08,04,08,04,08, 04,0C 1 OC,0C,0C,0078 

^820 DATA F0,F0,F0,F0,D2,FO.F0.F0,C3,FO,F0,F0,C3,FF,FF.FO,OEA6 

N830 DATA C3,AE,FF,F0,C3,FF,5D,FO,C3,FF,5D,F0,C3,FF,5D,FO,OC8Il 

\840 DATA C3,AE,FF,FQ,C3,AE,FF,F0,C3,FF,FF,F0,C3,AE,FF,F0,0DD1 

\850 DATA C3,FF,FF,FO,C3,C3,C3,F0,C3,C3,C3,D2,C3,C3,C3,C3,0Dll 

>860 DATA FO,FQ,Al,FO,52,52.78,78,7B,7B,7B,78,F8,FB,F4,F0,0AB9 

870 DATA FO,F0 l Al.FO,03,F0,B4,FO,B4,FO,B4,FO,F4,FO,FC,F8,0D2B 

•■-680 DATA FO,FO,A1.FO,52,52,FO,78,84,F0.7B,FO,F8,FO.FC,F8.0C65 

.890 DATA FO,F0,Al,FO,52,52,FO,7B,B4,FÛ,FO,?6,F6,F8,F4,FÛ,OC5D 

>900 DATA FO,F0,52,FO,52,FO,78,FO,78,78,3C,7fl,FO,Ffl,F0,F8,0B4O 

\910 DATA F0,F0,O3,52,52,FO,78,F0,3C,FO,FO,78,FO,F8,FC,FO,0B47 

'S 920 DATA F0,F0.Al,52,52,F0,78,F0,3C,FO,78,7B,F8,F8,FC.FO,OB75 

930 DATA FQ,F0,O3,52,F0,52,FO,78,B4,FO,B4,FQ,F4,F0,F4,FO,0BEF 

S 940 DATA FQ,F0,Al,F0,52,52,78,78,B4,FO,78,76.F8,F8,F4,FO,QB6i5 

» 950 DATA F0,F0,Al,FO,52,52,78,78,B4,78,F0,7B,F8,F8,F4,FO,OB6D 

'S960 DATA F0,F0,Al,FO,52,52,78,78,B4.78,F0,7B,F8,F8,F4,FO,0B6O 

970 DATA FO,FO,EO,FO,DO,DO,70,70,30,70,70,70,D6,D8,D8,DB,OB10 

S9B0 DATA F0,FQ,CO,F0,DO,D0,70,7Q,30,F0,7O,7Q,D8,D8,CC,F0,0B7C 

\ 990 DATA F0,F0,EO,FO,D0,D0,7O,F0,7O,FO,7O,F0,DB,D8,E4,FO,OCF4 

S 1000 DATA FO.FO.CO.FO.DO.DO, 70,70.70, 70, 70, 70,D8.D6,CC,FO,0B3C 

■M010 DATA F0,F0 F C0,D0,D0,F0 1 70,F0,30,F0,70,F0,D8,F0,CC,DB,OC7C 

1020 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,0000 

1030 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,0000 

1040 DATA FO,FD,CO,DO,D0,F0,70,F0,30,F0,70,F0,DB,FO,D8,FO,OCA0 

1050 DATA F0,F0,E0,DO,DO,FO,70,F0, 70,70, 70, 70,D8 t D8,E4,F0,0BF4 

■1060 DATA F0,FO,DO,DO,DO,D0,70,70,30,70,70,70,D8,D6,D8,DB,0AE0 

S 1070 DATA FO,FO,CO,DO,EO,F0,BO,F0,B0,F0,B0,F0,E4,F0,CC,D6,ODa8 

X1060 DATA F0,FO,FO,D0,F0,D0,F0,70,FO,7O,FQ.7O,D8,D8,E4,FO,0M4 

10S0 DATA FO,FO,D0,DO,D0,D0,70,70,3O,F0,70,7O,D8,D8,D8,D8,Cfi60 

1100 DATA FO,F0,D0,FO,DO,F0,70,FO,70,FO,7O,FO,D6,FO,CC,D8,ÛCEC 

1110 DATA FO,F0,DO,DO,DO,DO,3O, 70,70, 70, 70,70,De,D8,D8,D8,OAEO 

1120 DATA FO,F0,D0.D0,CO,D0,7O,7O,70,7O,7O,70,DB,D8,D8,D8,Qfll0 

1130 DATA FO,F0,EO,FO,D0,DO,?O,70,70,7O,7O,70,D8,D8,E4,F0,OB74 

1140 DATA FO,FO,CO,FO,D0,D0,7O,7O,3O,FO,7O,F0,D8,FO,D8,FO,OC20 

S 1150 DATA F0,FO,E0,FO,D0,DO,7O,70, 70,70,70, 70,D8,D8,E4,CC,0B50 

,1160 DATA F0,FO,CO,FO,DO,DO,70,70,3O,F0,70,70,D8,D8,D8,DB,OB70 

1170 DATA F0,F0,C0,DO,D0,FO,70,F0,30,70,F0,70,F0,Da,CC,DB,OBFC 

1180 DATA F0,FO,CO,DO,E0,FO,BO,F0,B0,F0,B0,FQ,E4,FO,E4,FO,ODC8 

1190 DATA FO,FO,DO,DO,DO,DO,70,70,70,70,70,70,D8,D8,CC,D8,0914 

1200 DATA F0,FO,M,DO,DO,IM, 70,70,70, 70, 70, 70,Dfl,D6,E4,F0,0B44 

1210 DATA FO f F0,DO,DO t DO,DO,70,7O f 70,70,3O,7O,D8,D8,D8 s D8,OAE0 

1220 DATA FO,FO,DO,DO,DD,DO,70,70,BO,FO,70,70,D6,D6,DB,D8,OBEO 

1230 DATA FO,FO,D0 t D0,0O,DO,7O,7O,BO,FO t BO,FO,E4.FO,E4,FO,0CE8 

1240 DATA FO,FO,CO,DO,FO,DO,FO,70,BQ,FO,70,FO,D6,FO,CC,D6,OCFC 

1250 DATA 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,0000 

M260 DATA FO,F0,FO,FO,F0,FO,FO,FO,F0,FO,FO,FO,F0,FO,FO,F0,OFOO 

\1270 DATA FO,F0,FO,FO,F0,F0,FO,FO,F0,FO,FO,FO,F0,FO,FO,F0,OFO0 

1280 DATA FO,F0,FO,F0,F0,F0,F0,F0,E0,9O,F0,C0,E0,90,30,70,OCBD 

1290 DATA E0,9O,F0,CO,30,30,70 t C0,30,3O,3O,7O,E0,90,3O,B4,07B4 

\1300 DATA F0,C0,7O,FO,30,DB,CO,C0,C0,C0,CO,C0,CO,CO,CO,D0,0BA8 

1330 DATA EO,30,FO,90,EO,30,30,30,EO,30,EO,90,30,30,FO,90,0660 

1320 DATA 30,30,30,D8,CO,30,30,30,D8,90,70,FO,30,De,CO,CO,0808 

\ 1330 DATA CO,60,CO,CO,CO,CO,CO,[)0,EO,30,BO,30,BO,30,BO,30,OS60 



M340 
V1350 

— 1360 
■^1370 
« 1380 

~-*1390 

^1400 
S 1410 
XI 420 
X1430 
S 1440 
■^1450 
V1460 
„1470 
XI 480 
X1490 
^1500 
"N.1S10 
V1S20 
\1530 
"M540 
^1550 

*^1S60 
X1S70 
N.15B0 
N.1590 



DATA BO,30,B> 
DATA D8.B0.3i 
DATA B0,30.B 
DATA B0,3Q,F( 
DATA CO.60,6 
DATA BO, 30.31 
DATA D8,F0,3 
DATA BÛ,30,3i 
DATA B0,30,F 
DATA CO,CQ,0 
DATA B0,64,F 
DATA D8,F0,B< 
DATA B0,30,D 
DATA BO,64, F 
DATA C4,CC,C 
DATA BQ,64,F 
DATA D8,F0,3 
DATA B0.30.6 
DATA B0,64,F 
DATA C4,C8,C 
DATA B0,64,F 
DATA D8,B0,3 
DATA B0.64.E 
DATA BO, 64, F 
DATA C4,CC,C 
DATA B0,64,8 



,30,F0,F> 
,B0,64.H! 
,70,B0,Î 
,F0,30,W 
,60,60,C 
,30,F0,Fi 
,30,D8,F 
,FO,B0,3i 
,F0,30,D 
,C0,6O,C< 
.30,30,6 
,64,F0,F< 
,F0,80,3 
f FÛ,3û,3 
,C8,C0,C 
,F0,FQ,3 
,30, 70. F 
,FO,B0,3 
:,F0,30,E 
,C0,C4,C 
>,FO,F0,3 
,B0,30,F 
<,64.B0,2 
,F0,30,D 
I.C8.C4.C 
,30.30,6 



.FO.30,30. 
,C0,60,C0, 
.FO.3O.B0, 
,F0 t 30,D6, 
.CO.DO.BO, 
,FO,FO,BO, 
.CO.CO.CO, 
,B0,30,B0, 
,F0,30,D8 t 
, CO.DO.BO, 
,FO,FO,B0, 
,CO,CO.C0, 
,30,70,80, 
,30,30,08, 
.CO.DO.BO, 
,D6,F0,B0, 
,C4,C4,C4, 
,64,F0,80, 
.F0.30.D8, 
, CO.DO.BO, 
.DB.FO.BO. 
,C4,C4,C4, 
).30,D8,B0. 
,F0,30,D8, 
..CO.DO.BO 
,FO,FO,BO, 



30,64, 
30, C0,< 
30, BO, 
B0.30,: 
30,30, 
30, FO, 
30, CO, 
64, BO, 
F0,30, 
30,30, 
30, FO, 
CO.CO. 
,64, FO, 
FO,BO, 
.30,64, 
64, FO, 

co.a, 

64, FO, 
B0.30, 
30,30, 
64, FO. 
C0,C4, 
64, FO, 
30,70, 
,64,30, 
,64, FO, 



1,30.64.80,30, 
!,60.C0,C0.DO ( 
t,FO,FO,FQ,F0, 
',64,F0,C0.C0, 
),B0,30,F0,3O. 
i,3O,Dfl,F0,30, 
),60,CO,C0,DO. 
l,70,FO,FO p FO t 
3Q,D8,F0,CQ,CQ. 
I,B0, 30,30, 30, 
1,30,30,30,30 
I, CO.CO.CO, DO, 
>,B0,3O,D8,FQ 
i t F0,FO,C4,C8, 
).B0,3O,D8,F0 
),30,D8,F0,30 
k,C4,C4,C0,D0 
),F0,3Û,D8,F0 
),3O,F0.C4,C4 
),BO,30,64,FO 
),30,D8,F0,3Û 
k,C4,C4,C0,D0 
1,30,30,!! 



0A24 
0610 
0*68 
OASO 

08F4 
0A58 
08F0 
,0828 
OBBC 
,09C4 
,09FC 
,0fi0C 
,0AF8 
,0B34 
t 0A44 
,0A2C 
.ÛA4C 
,0AF8 
,0B34 
30,30,30, N.FO.OBGC 
FQ,30,70,C4,CB,09B0 



*Kl600 DATA D8,30 t 70,FO,30,70,CO,CÛ,CO,CO,CO,CO,CQ,CO,CO,DO,OA98 
N1610 DATA FO,FO,FO f FO,FO,FO r FO,FO l FO r FO f FO l FO,FO t FO l FO,FO r OFOO 
M620 DATA FO,FO,FO,FÛ,FÛ,FO,FO,FO,FO h FO,FO,FO,FO,FO,F0,FO,OFOO 
'M630 DATA F0,F0,F0,F0,F0,F0,F0,F0,0O,0O,0O,00, 00,00,00.00, 0780 



-- LISTING 3 
= ASSEMBLEUR 



i,B0,84.t 
),30,D8,F 



10 BEB=&9023;LGMG=fe71;NO«*="KEI3TAI2.BtH":UiG-lQO ' 
20 FOfi A=fc9023 TO 19023+1.71 STEP lfi:S0H=0:F0R B=0 TO 15:BEAD A 
liPOKE A*B,ÏAL( , lt'tAt):SOH=S0Htl/AL("l ! '+At):HEn:LlG=LIG+10:PRI 
NT L1G:IEAD AI: IF SOHOYALffc'tM) THDi PBIHT"EBHEUH EH LIGUE" 
;LIG:EHD EL5E NEXT 
VaO SAVE HOHt,B,DEB,LOHG:END 

"MOO DATA 00,11, 00, 70, 21, 00,00,06,60, C5,E5,Q1,28,00,1A,AE,0463 
'Mlû DATA 77,23,13,10,F9.E1 T CD,2G,BC,C1,10,ED,C9,00,21,FF,07ED 
X.120 DATA B7,16 P 00,DD,5E, 04, 19, DD,46,02,C5,11, 00,08,19,02, 0513 
S 130 DATA 59,90,01, 5O,C0,09,Cl, 10, FI, 22,60,90,C9,00,00 P 00,Û5AO 
"M40 DATA 00,00,00,00,01, 71, 90,21, 63,90,CD,D1,BC,C9, 76.90,063F 
Kl50 DATA C3,7E,90,53,50, 52, 49,54,(3, 00, OO.CD, 41, 90.2A, 60, 0650 
klfiO DATA 90,22,28, 90,DD,6E,00,DD,66,01, 22,25, 90.CD.23, 90,0650 
IN 170 DATA C9, 00,00,00,00, 00,00,00,00,00,00,00, 00,00,00,00,0009 



'NITIATION 



PROGRAMMATION 

EN ASSEMBLEUR 

Z-80 



Cette série d'articles à 
pour but de vous faire 
comprendre le langage 
assembleur, sans pour 
autant vous inonder de 
cours fastidieux souvent 

inutiles car 

décourageants. Certes, 

il y aura une partie 

apprentissage, mais 

aussi et surtout une 

grosse partie concernant 

la pratiqué de 

l'assembleur en 

commençant par des 

routines assez simples 

utilisant les routines 

système, puis en 

poursuivant avec des 

routines plus difficiles, 

mais non moins 

intéressantes dont je 

vous laisse pour l'instant 

la surprise. 




sa 
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POUR BIEN DEBUTER 

Commencez par oublier votre bon 
vieux locomotive Basic, nous n'y fe- 
rons que très rarement allusion. Ces 
deux langages n'ont rien à voir ! Le 
Basic a. de plus, beau être simple et 
pratique d'emploi, vous verrez qu'au 
bout d'un peu de temps l'assembleur 
est beaucoup plus concret, ce qui ne 
semble pas si évident au premier coup 
d'œil. 

Ensuite, armez-vous de patience 
et pratiquez énormément, sans tou- 
tefois abuser, en trafiquant, modifiant 
les exemples qui vous seront propo- 
ses. 

Oui mais, ce n'est pas tout I Pour 
bien débuter, il faut aussi de quoi pra- 
tiquer l'assembleur. Vous aurez donc 
besolnd'un assembleur. Je vous con- 
seille ZEN, peu convivial de par sa pré- 
sentation, mais assez fourni en options, 
Bien sûr. Il y a aussi DAMS, DEVPAC 
qui sont aussi bons. Je vous conseille 
aussi les «Clefs pour AMSTRAD» de chez 
P.S.I. qui est un très bon outil et qui 
contient de précieux renseignements, 
et toutes les routines système de l'Ams- 
trad largement commentées et dé- 
taillées. 



COMMENÇONS PAR 
LE COMMENCEMENT 

Lorsque vous saisissez un program- 
me Basic, vous ne vous souciez pas 
de sa place en mémoire, car c'est l'or- 
dinateur qui s'en occupe, et qui vous 
Indique lorsque vous dépassez la 
place disponible. Ici, en assembleur, 
c'est à vous de dire où le programme 
commence, et c'est aussi à vous de 
faire attention à ne pas dépasser la 
place disponible, sans quoi l'Amstrad 
partirait dans un délire souvent Irré- 
cupérable autrement que parson ex- 
tinction. Mon but n'étant pas de vous 
faire un cours sur la structure de la mé- 
moire de l'Amstrad, je rappellerai briè- 
vement les choses â savoir : 

• La mémoire Basic commence à 
l'adresse &170, on ne touche pas â 
cequ'llyaavant. DANGER I 



• La mémoire écran, est-ce bien né- 
cessaire de le rappeler, débute en 
&C000 et se termine en &FFFF. 

• On ne touche â rien entre &BOO0 et 
&BFFF, Il y a les routines système de 
l'Amstrad et plein d'autres renseigne- 
ments très utiles, 

Voici un schéma récapitulatif. 



W8SS L 



&170 &100O 



&AQOO &B0OO 



En ce qui concerne la mémoire 
programme, on se limitera entre les 
adresses &1000 et &A000, à la fols par 
sécurité pour les routines système, et 
pour avoir de quoi taper un petit lan- 
ceur sous Basic. 

Maintenant, on va programmer. 
L'Instruction permettant donc d'Im- 
planter un programme assembleur à 
une adresse précise et qui est la pre- 
mière Instruction d'un programme est 
ORG. 

Syntaxe : ORG adresse 
Exemple ; ORG 8000H Implante le pro- 
gramme à partir de l'adresse hexa 



Remarquez le fait que J'ai écrit 
8000H. Sous ZEN, c'est ainsi que l'on 
désigne une adresse, ou une valeur 
hexadécimale : on tape la valeur, sui- 
vie de H. Certains assembleurs con- 
servent la syntaxe Basic (Ici cela don- 
nerait &80O0), et d'autres ne compren- 
nent que l'hexadécimal et ne deman- 
dent donc pas de symbole spécial (Ici, 
on aurait donc 8000. tout simplement). 

Une seconde Instruction suit cette 
première, et sert â Indiquer le point 
d'entrée du programme, c'est-à-dire 
l'adresse à partir de laquelle on le lan- 
ce. Cette Instruction sert dans le cas 
où on lance le programme à partir 
de l'éditeur, pour qu'il sache à quelle 
adresse partir. Généralement adresse 
d'implantation et point d'entrée sont 
confondus. Sous ZEN , cette Instruction 
est LOAD ; sous d'autres assembleur, 
on trouve ENT. 
Syntaxe : LOAD 1 adresse 
ou ENT f 

Ce qui nous donne pour l'Instant : 
ORG 8000H 
LOAD BCO0H 



Maintenant, il reste à taper le pro- 
gramme. Mais avant, Il faut parler de 
ce qu'est un registre et de la façon 
de le charger. Vous n'avez strictement 
rien compris à cette dernière phrase, 
mais ne vous Inquiétez pas, tout 
s'éclalrcira par la suite. 



QU'EST-CE 
QU'UN REGISTRE ? 

Vous savez tous ce qu'est un oc- 
tet et qu'il est composé de 8 bits. Vous 
savez aussi que chacun de ces bits 
peut prendre deux valeurs, 1 ou 0. 
Dans un octet, chacun des huit bits 
est numéroté de à 7. A chacun de 
ces rangs n est affecté la valeur 2n, 
soit en partant de 0, on obtient les va- 
leurs 1 (2°), 2 (2 1 ), 4 (2 2 ), 8 (2 3 ), 16 C2 4 ), 
32 (2 5 ), 64 (2*), 128 (2 7 ). Ainsi suivant 
la valeur de chacun des bits, on pour- 
ra calculer la valeur de l'octet. Voici 
un exemple explicatif. 

On prend comme valeur binaire 
11010011 



Rang 


7 


6 


■5 


t 


3 


2 


1 





Valeur du bit 


! 


] 





1 








1 


1 



On obtient la valeur de l'octet en 
multipliant le bit correspondant par la 
valeur affectée à son rang, ce qui nous 
donne : 

Valeur = lx2 7 + 1x2» + 0x2=+ Ix2 4 + 0x2 3 

+ 0x2 2 +1x2' + 1x2° 

d'où Valeur = 1 28 + 64+0 + 16 + + 

+ 2+1 

donc Valeur = 211 



En mettant tous les bits à 1 , on ob- 
tient la valeur maximale d'un octet 
qui est 255, et évidemment la valeur 
minimale est 0, tous les bits étant à 0. 
Ah. à propos, retenez le fait que lors- 
qu'un bit esta 1. on dit qu'il est mis. 
On s'en resservira. 

Revenons-en aux registres. On peut 
considérer un registre comme étant 
une mémoire. Sur l'Amstrad, les prin- 
cipaux registres sont désignés par une 
lettre: A, B, CD, E, H. L 

On les appelle registres simples, et 
chacun d'eux peut séparément con- 
tenir une valeur sur 8 bits, donc com- 
prise entre0et255. Pourquoi al-Jeéqrit 
séparément, vous demandez-vous 7 
Tout simplement parce que ces regis- 
tres peuvent être couplés entre eux 
pour faire des registres 16 bits, donc 
comprenant des valeurs situées en- 
tre et 65535, sur 2 octets donc. Seu- 
lement, on ne peut pas les coupler 
de n'Importe quelle façon, seuls sont 
acceptés les assemblages suivants : 

B + C = BC 
D + E = DE 
H + L = HL 

Le registre A peut aussi être cou- 
plé à un registre appelé F. mais son 
utilisation est assez spéciale, on y vien- 
dra prochainement. 

Adressage des registres : 

Adresser, charger un registre, c'est iul 
donner une valeur, tout simplement. 
Il y a plusieurs modes d'adressage, 
mais ceux-ci utilisent la même instruc- 
tion : LD (abréviation de LOAD). 

Adressage Immédiat : 
cela consiste à charger purement et 
simplement un registre avec une va- 
leur. 

Syntaxe : LD 
registre, valeur 
Exemple: LDH.19 
charge le registre H avec la valeur 1 9 

Je profite d'être arrivé à ce stade 
pour vous proposer un premier pro- 
gramme. Nous allons en effet écrire 
un mot à l'écran. Pour cela II nous faut 
appeler la routine système &BB5A qui 
sert à afficher à l'écran le caractère 
correspondant au code ASCII conte- 
nu dans l'accumulateur (c'est ainsi 
que l'on appelle le registre A). 




L : Instruction pour appeler une rou- 
tine système, ou une routine utilisateur, 
est la même qu'en BASIC, à savoir 
CALL. La syntaxe est aussi semblable : 
CALL adresse. 

Ici, on aura donc CALL 0BB5AH (le 
et le H sont Indispensable sous ZEN) 
Voici donc un premier petit program- 
me : 

ORG 8000H 
LOAD 8000H 

LD A, 65 : 65 est le code ASCII de la 
lettre «A» 

CALL 0BB5AH : affichage de la let- 
tre «A» sur l'écran 

RET : Instruction Indispensable à cha- 
que programme car elle sert à Indi- 
quer que c'est la fin et qu'il ne faut 
pas aller plus loin... Indispensable sans 
quoi le pauvre Amstrad se plante en 
beauté I 

END : END sert à dire à l'assembleur 
qu'il ne faut pas aller plus loin dans 
l'assemblage. 

Maintenant sélectionnez l'option 
«assemblage», etau bout de quelques 
infants vous devriez voir apparaître 
chacune de vos lignes de programme 
précédées d'une série de codes hexa- 
décimal. Ces codes sont les codes 
que comprendra la machine, c'est ça 
le langage machine, c'est ça aussi 
les datas que vous trouvez chaque 
mois dans AMSTRAD & CPC. Ah, j'ou- 
bliais I Pour sortir de l'édition d'un pro- 
gramme sous ZEN . il faut taper @ (ar- 
robas) suivi de ENTER. Ensuite sélec- 
tionnez l'assemblage, 

Maintenant revenez sous Basic, soit 
quittez l'Interpréteur assembleur. Main- 
tenant tapez (en Basic bien sûr) : CALL 



&8000 puis ENTER. Miracle, un A vient 
des'afficher I Splendlde I Hallucinant I 
Mirobolant I Vous venez de réussir vo- 
tre premier programme assembleur ! 
Bon alors maintenant, tapez le listing 
suivant, après avoir effacé celui-ci, as- 
semblez-le et lancez-le, vous ne se- 
rez pas déçu : 

ORG 8000H 
LOAD 8000H 

LD A, 65 
CALL 0BB5AH 
LD A, 77 
CALL 0BB5AH 
LD A, 83 
CALL 0BB5AH 
LD A. 84 
CALL 0BB5AH 
LD A. 65 
CALL 0BB5AH 
LD A, 82 
CALL 0BB5AH 
LD A, 38 
CALL 0BB5AH 
LD A. 67 
CALL 0BB5AH 
LD A, 80 
CALL 0BB5AH 
LD A, 67 
CALL 0BB5AH 

RET 
END 

Assemblez-moi ça. revenez sous 
BASIC, et faites un CALL &8000 et res- 
pirez un grand coup. . . Fabulon, neux 1 

Bien, maintenant, aidez-vous de 
votre manuel sur l'Amstrad et dé- 
brouillez-vous avec les codes ASCII 
pour écrire votre nom et tout ce que 
vous voulez à l'écran. 

On va à présent rajouter quelques 
effets au programme par l'utilisation 
de nouvelles routines système. Le prin- 
cipe reste le même : on charge les 
registres requis avec les valeurs requi- 
ses, puis on appelle la routine. Simple 
non ? 



Voici quelques routines : 

• 0BB75H : positionnement du curseur 

écran (LOCATE X, Y) 

Syntaxe : LD H, X (remplacer X par 

votre valeur) 

LD LY 

CALL 0BB75H 



Bien sûr comme en BASIC, cette 
routine est à placer avant l'affichage 
de votre mot. 

. OBCOEH ; choix du mode écran. Le 
registre A est chargé avec le numé- 
ro du mode. 

• 0BC32H : choix des couleurs de 

chaque encre 

A : numéro de l'encre (0 à 15) 

B : numéro de la première couleur 

(0 à 26) 

C : numéro de la seconde couleur 

(0 à 26) 

. 0BC38H : choix des couleurs du 
BORDER 

B : numéro de la première couleur 
(0 à 26) 

C : numéro de la seconde couleur 
(0à26) 

Remarque : pour ces deux routines, 
pour éviter le clignotement des cou- 
leurs, on chargera B et C à la même 
valeur. 



• 0BB9QH : choixdelacouleurd'êcrl- 
ture (PEN) 

A : numéro de l'encre (0 à 15) 

• 0BB96H : choix de la couleur de 
fond (PAPER) 

A : numéro de l'encre (0 à 15) 

Voilà de quoi bien vous amuser. 
SI jusqu'ici vous avez tout compris, vous 
ne devriez pas avoir trop de problème 
pour utiliser ces routines. Mais atten- 
tion, nous n'allons pas donner un cata- 
logue des routines système, "Clefs pour 
AMSTRAD» le fait très bien.,, 

Bien sûr le mode d'adressage Im- 
médiat que nous venons de voir s'ap- 
plique aussi pour les registres doubles, 
à la différence que cette fols il est 
possible d 'entrer des valeurs supérieu- 
res à 255, ce qui est utile par exem- 
ple dans le cas de coordonnées gra- 
phiques : 

. routine 0BBEAH : affichage d'un 
point en coordonnées absolues 



DE : coordonnée en X 
HL : coordonnée en Y 

• 0BBEDH : affichage d'un point en 
coordonnées relatives 

• 0BBF6H : traçage d'une ligne en 
coordonnées absolues 

• 0BBF9H : traçage d'une ligne en 
coordonnées relatives 

Même syntaxe que ci-dessus. Les 
lignes sont tracées depuis l'ancienne 
position du curseur graphique. 

Bon pour vous aider. Je vous pro- 
pose de saisir le listing commenté qui 
suit. Ce sera tout pour ce premier ar- 
ticle. Avouez que la difficulté n'est pas 
énorme pour le moment. Il faut dire 
que nous avons vu peu de choses, très 
peu de choses. L'article du mois pro- 
chain, bien qu'assez bref, traitera de 
points très Importants pour la suite. Ne 
vous découragez cependant pas, ce 
n'est qu'à partir du troisième article 
que vous serez réellement emballé. 
Je ne vous en dis pas plus. Il n'y au- 
rait plus de surprise. A bientôt I 




ORG 7000H 

LOAD 7000H 

LDA, 1 

CALLOBCOEH 

LDA.O 

LDBC.O 

CALL0BC32H 

LDA. 1 

LDBCO 

CALLOBC32H 

LDA. 2 

LDBC.O 

CALLOBC32H 

LDA. 3 

LDBC.O 

CALL0BC32H 

LDBC.O 

CALL0BC38H 

LDA. 1 

CALLBBDEH 

LDDE.208 

LDHL.236 

CALLOBBEAH 

LDDE.40O 

LDHL.236 

CALLOBBFôH 

LDA.2 

CALLOBBDEH 

LDDE.40O 

LDHL, 196 

CALLOBBFÔH 

LDA.l 

CALLOBBDEH 

LDDE.208 

LDHL. 196 

CALLOBBFÔH 

LDA. 3 

CALLOBBDEH 

LDDE.208 

LDHL.236 

CALLOBBFôH 

LDH, 15 

LD L, 12 

CALL0BB75H 

LDA.l 

CALLOBB90H 

LDA. 65 

CALL0BB5AH 

LDA.2 



; Implantation du programme 
; à l'adresse &7000 

Model 

on met toutes les 
encres en noir 
INK 0.0.0 



INK2.0.0 



INK 3, 0.0 

Idem pour le 

Border 

ou choisir la couleur 

graphique (n° de l'encre ; 1 à 15) 

Maintenant on dessine 

un peu.,. 



Maintenant 
on va 
écrire un peu 



CALL0BB90H 




LD A. 77 




CALL0BB5AH 




LDA. 3 




CALL0BB90H 




LDA. 83 




CALL0BB5AH 




LDA. 1 




CALL0BB90H 




LDA. 84 




CALL0BB5AH 




LDA.2 




CALL0BB90H 




LDA, 65 




CALL0BB5AH 




LDA. 3 




CALL0BB9OH 




LDA. 82 




CALL0BB5AH 




LDA.l 




CALL0BB90H 




LDA. 38 




CALL0BB5AH 




LDA.2 




CALL0BB90H 




LDA. 67 




CALL0BB5AH 




LDA.3 




CALLOBBÇOH 




LDA, 80 




CALL0BB5AH 




LDA. 1 




CALLOBBvOH 




LDA, 67 




CALL0BB5AH 




LDA, 1 


Voila. Maintenant 


LDB.2 


on va mettre un 


LDC.2 


un peu de couleurs... 


CALL0BC32H 




LDA.2 


pour faire Joli 


LDB.6 




LDC.ô 




CALL0BC32H 




LDA.3 




LDB.25 




LDC.25 




CALL0BC32H 




CALL0BB00H 


Pulsonvidelebufferclavier 


CALLOBBOÔH 


pour attendre l'appui sur une 




touche, et... 


RET 


c'est fini 1... Emotion 1 


END 




Suivre ta procédur 


> habituelle, à savoir : 


• Assemblage 




• Retour au Basic 




• Call &7000 





Emmanuel GUILLARD 



RESULTATS CONCOURS 



MICROID S 

A MSTA R & 

CPC35 



HIGHWAY PATROL 



1 - Quel est le thème du jeu ? 

2 - Quel est l'objet livré avec le lo- 
giciel et qui se révèle être indispen- 
sable à votre folle poursuite ? 

3 - Donnez l'objet du délit. 

4 - Comment s'appelle l'arme à feu 
plaquée sur le tableau de bord ? 



1 a chasse au voleur 

Une carte routière 
Le pillage de stations service 

1 Jn fusil à pompe 




LISTE DES GAGNANTS : 

Gagne un radio-réveil-lampe orien- 
table GO-FM : 

1 - LEBASTARD Laurence - 76610 LE 
HAVRE 

Gagnent 3 logiciels Microïds : 
2-THELL1ER PAUL -62550 PER- 
NES 

3 - ADRASTE Médéric - 78500 S AR- 
TROUVILLE. 

4 - AGOPIAN Pascal - 18000 BOUR- 
GES 

5 - ZAMBE AU David - 54140 TAR- 
VILLE 



Gagnent 2 logiciels Microïds : 

6 - MARGOT Cédric - 77120 COU- 
LOMMIERS 

7 - BLANC Cyrille - 87100 LIMOGES 

8 - STAEDEL Hervé - 57710 BURE 

9 - REVERDY Jack - 45400 FLEURY 
LES AUBRAIS 

10- DOMIN Olivier - 91700 Ste GE- 
NEVIEVE DES BOIS 



Gagnent 1 logiciel Microïds : 

11 - IDIR Laurent - 27510 TOURNY 

12 - HAMEL Noël - 75010 PARIS 



13 - DEMARCY Thierry - 60180 NO- 

GENT/OISE 

14-SIEUROS Arnault- 60150 

THOUROTTE 

15 - JOUBE David - 021 10 BOH AIN 

16 - LAMBERT Sébastien - 85000 La 
ROCHE/YON 

17 - DAVID Pascal - 77260 LA FERTE 
S/SJOUARRE 

18 - HOURTICQ Sébastien - 91400 
SACLAY 

Ï9 - PONS Frédéric - 17270 MONT- 

GUYON 

20-1LLIDE Emmanuel -59600 

MAUBEUGE 



CARAC 



Valable pour 
& CPC Sài 
S CPC 664 
[> CPC 6128 



DDDDEEEE 



IIJJKK 
NNNNNNNf 



uuuvvww 



000&? 




Si vous souhaitez 

obtenir des caractères 

multicolores avec 40 

caractères par ligne en 

MODE (par exemple), 

voici le programme 

CARAC qui donnera 

un look «pro» à 

vos programmes. 



Cette routine marche en mo- 
de direct sous Basic ou as- 
sembleur. Elle a l'avantage 
de ne pas utiliser l'Instruction TAG qui 
alourdit et ralentit les programmes, 
La routine que je propose redéfinit 
complètement les modes et est tota- 
lement compatible avec les autres 
modes. 

Avec CARAC. un simple appel rou- 
tine (CALL ROUTINE) et un prlnt suffi- 
sent. Pour plus de renseignements, je 
vous propose d'aller jeter un coup 
d'oeil sur les paragraphes ci-dessous. 

- Pour avoir le MODE avec 40 co- 
lonnes : on Inltiallse l'écran par un MO- 
DE 1 (40 colonnes) puis on établit le 
MODE par un CALL &7970. 

Nous avons alors 4 stylos (comme en 
mode 1 ) : 

« Les encres 1 et 4 correspondent au 
1 er stylo 

• Les encres 2 et 8 correspondent au 
2nd stylo 

• Les encres 3 et 12 correspondent 
au 3ème stylo 

- Pour avoir le MODE 1 avec 80 co- 
lonnes : on initialise l'écran un par MO- 
DE 2 (80 colonnes) puis on établit le 
MODE 1 par : CALL &79S2 ou CALL 
&79B4 ou &799B (au choix I). 



- Pour revenir au MODE 2 avec des 
encres et caractères normaux, on fait 
un CALL & 100. 

- Pour avoir un mode une ligne sur 
deux (totalement compatible avec 
les MODES normaux (0, 1, 23 et ceux 
ci-dessus) : 

1 CALL &78AA -» MODE UNE LIGNE 
SUR DEUX 

2 CALL &78F1-» MODE UNE LIGNE SUR 
DEUX EN MODE 2 



3 CALL &7900 -» MODE UNE LIGNE 
SUR DEUX EN MODE 1 

4 CALL &790F -» MODE UNE LIGNE 
SUR DEUX EN MODE 

5 CALL &791E -► RETOUR AU MODE 
NORMAL DANS LEQUEL VOUSTRAVAIL- 
LEZ 

6 CALL &792S -» MODE NORMAL 

Attention, le Ml /2 (Mode une ligne 
sur deux) N° 1 redéfinit l'écran avec 
25 lignes et seulement 1 5 sont visibles 



â l'écran donc lorsque vous travaillez 
dans les modes 0, 1 et 2, Il est préfé- 
rable d'utiliser N° 2, 3 et 4. 

Le retour au mode normal dans le- 
quel vous travaillez (N° 5) ne marche 
pas avec les MODE 1 80 COLONNES 
et MODE 40 COLONNES, si vous vou- 
lez revenir au mode normal, utilisez le 
N°6. 



Stéphane ST MARTIN 



tu ' ukAa tei 1989 

20 ' AHSTAfi ii Ci'C et Stéphane Saint-fartin 

30 ' 

40 BESTÛftE 5Ù:F0£ 1=00830 TO 35815:READ A:PÛKE I.A;N£ÏT I 

50 DATAfcl.fcO.fcBCI^E.fcQ.fcED, 1.79,1.1, iÙ.iBD 

60 DATAiJE,&7F,tEB,i79,fcl,iO,l.BC,fc3E,i4,I.EB mm 

70 DATAfc79,fcl,t.0,fcBD,i3E,il2,fcED,i79,fcl,U) M 

80 DAFAfcBi;,!.3E,i:i,kED,l/9,il,fcO,fcBO,k3E,iF '^Mj 

90 DATAfcED,1.79,fcl,fcO,fcBC.fc3E p i6,tED,t.79,l.l 

110 DATA!.7,fcED,l l 79,i.l,i.0,fcfllJ,fc3E,ilI 1 fcED 1 1.79 S^ 
12U DATAl.C9,fc2E,tÙ,ilE,l£,(.2fi,iQ,fcl6,fc5û,iCD 

130 DAîAfc66,iBB 1 fcCD,WA,fc7e,iC9,t2E,t 1 0,J.lt I fcE ^^ 

14U &ATAfc26,&0 I fclb,fc2â.i.CD,(.66,fc8B,iai.fcAA,i/ô Wm 

1S0 DAÎAiC9.fc2E,iÙ,ilt,i,L,1.26,l.û, (.16,1.14, LCb ||^ 

160 0ATAi66,fcBB,lCB,fcAA,I.79,fcC9 l iC[>,fcU,iaC,l 1 CC j^M 

170 DAÎA!£,fcBC,iC0,b28,i7a t fcC9,l l l,fc0,fcBC,i.3E ; 
180 DArAfcû, (£0.1.79, i.l,fcÙ,fcB0,&3E,43F,tE[>,l73 

190 DATAil,fcÛ,bBC,i3E,fc4,bED,fc7a,il,fcO,fcBD «£p 

200 0ArM3E ( t26,i I É6,4?9,tl,t0,l 1 flC,l3E,i5,tED ?p;' 

210 DATAfc79,il,iQ,fcBD,fc3E,fcû, (£0,1.79,1.1.10 ff^ 

Z2U 0ArAfcbC,i3E,fc6,tL£D,(.79,41,i0,fcBD,i3Ë.fcl9 |$| 

230 DATAiED,fc79,il,!fû,fcBC,i3E,fc7,iED I fc79 1 l.l |pf 

240 0ArAiÙ,(,BB,fc3£.tlE.J,ED,l<73,fcC9,fcFF,fcCD,&D7 ||J| 

260 DATAi79,iC0,&CÛ,l<79,i21,ti0,iao,htl,iFC,ti3F ||;| 

260 DArAil,l£B,t2.iED,fcBO.!.C3,iO,!.0,fcO,&0 É|j 

270 DATAfcÙ,i3E,6.1,fcCD,(.lC,iBD,! 1 CD ( fcC0,i7a,fc21 ||| 

2B0 ûArAAf&.taî.tll.fcFCiâF.tUfcFB.tl.fcED.fcflÛ B 

290 DATAiC9,fcû, (.0,1.0,1.0, fc0,i3E,U,l.C0,fclC ||| 

300 DArAiflD.iCD,iCD,fc73,i21,fcF2,fcB5,I.U,fcFC,liûF ||$ 

310 DATAfcl,iF8 t fc2,fc£D,fcB0,fcC9,fcû, 1.0,1.0,1.0 : 

320 DAfAfcQ, fc3E.it, fcCD,ilC.l.BD,iCD,!,C0,fcf 3.1.21 4jjj 

330 DATAiEB,iBB,ill,l.FC,i9F,fcl,iFB,fc2,iED,fcB0 : J| 

3->'j DArAfcC9,i2l,fcFC,Jâf.ill,iiû.fcO,fcCMA8.fcBB f|J| 

350 DATAfcC9,13E.fcÛ,l<Ffl,ld>9,fcCB,fce9,fcC&,fcBl.iBl §j| 

360 OArAiar.fcED.Uâ.ifB.lùS.fcCâ^i.iFCfcâF.fclE |^j 

370 0ATAfc2û,iCD,fcAB,fcBB,fcC9,(.3E,fc0,iFB,fcUd,tLCB ||| 

360 DArAfc89,fcCB,l61,fcBi,fc4F.i£D.fc*9,fcfB,fcBû,fc<3 fM 

390 DATAiFF.fcFF, 1.0,1.0, (.O.iO.fcFF.bFF.fcFF.LFF ||| 

400 r;ArA10,tO,iU,fc0,iFF,iFF,iFF,fcFF,fcû,fcû ||| 

410 DATAfcO,tû,fcFF,fcFF,fcFF,fcFF,iiO,fcO,fcû,fcQ ||p 

420 DArAfcKF.ifF.tfF.lFF.fcQ.iO.fcû.lÛ.tFF.iFF Ë5 

430 DATAfcFF,UF,!<0,fcO,l.Û,fcO,fcFF,tFF.tFF,fcFF ^ 



440 DArAiO.&û.fcO.tO.ifF.fcFF.fcFF.fcFF.fcO.iQ 
450 DATAfc8,fcO P fcFF,fcFF,iFF,tFF,fcQ,fcÛ,iO,fcO 
460 DArAtFF.fcFF.fcFF.fcFF.fcO.fcÛ.tO.fcO.fcFF.fcFF 
470 DAÎAfcFF,fcFF,iO,fcO,1.0,fcû ( fcFF,fcFF,iFF,lFF 
4B0 DATAtO.i.Q.fcO.fcû.fcFF.fcFF.fcFF.fcFF.fcQ.iO 
490 DATAfcO,fcO,iFF,fcFF,tFF,fcFF, fcû.fcO.fcQ.fcQ 
500 DATAfcFF,tFF,fcFF,fcFF,i0,fcO,fc0,fcQ,fcFF,fcFF 
510DATAfcFF,fcFF,kO,fcO,iO,fcO,fcFF,fcFF,iFF,fcFF 
520 DArAiO,fcO,fcO,lQ,fcFF,fcFF,lFF,fcFF,tû,fcO 
530 DATAfcO,fcO,fcFF,fcFF,fcFF,fcFF.fcO,iO,iO T fcO 
540 OArAfcFF,fcfF,fcFF,i£F,I.O,fc0.fcO,i0.fcFF,fcFF 
550 DATAiFF,fcFF,fc0.fcQ,bQ,fcO,fcFF,fcFF,fcFF,lFF 
560 DAIAfcO.fcO.&Ù.fcO.fcFF.fcFF.tFF.fcFF.fcO.iO 
570 DATAiQ,iO,fcFF,tFF,fcFF,iFF,iû,fcO,fcO,fcO 
560 OArAiiF.fcFF.iFF.fcFF.fcÛ.iû.iû.tO.fcFF.tFF 
590 DATAiFF,fcFF,fcû,fcQ,fcO,fc0,fcFF,fcFF,fcFF,I.FF 
600 BArAfcO,t0.fcO,fcû,fcFF,fcFF,fcFF,fcFF.fcO,fcQ 
610 DATAfc0,fc0,iFF,fcFF,fcFF,fcFF,fcÛ,fc0,«),fc0 
620 DATAfcFF,fcFF.fcFF,fcFF.fc0.fcO,fcO,fcQ,fcFF,i.FF 
630 DATAiFF,iFF,fcO,iO,fcû,fcO,fcFF,tFF,fcFF,fcFF 
640 DAÏAfcO.fcO.iO.fcO.fcFF.fcFF.kFF.fcFF.fcO.fcO 
650 DATAi0,M),fcFF,fcFF,iFF,fcFF,fcQ t i<J,fcO,i0 
660 DATAfcFF,4FF,iFF,fcFF,fc0.fcû,iO,fcO,fcFF.fcFF 
670 DATAfcFF,iFF,fc0,iO,fcO,fc0,iFF,iFF,fcFF,fcFF 
680 JjATAfcQ,fc0,&0,fcO,fcFF,fcFF,fcFF,fcFF.I.Q,fcO 
690 DATAfcO,tû,fcFF,iFF,lFF,iFF,iO,!.0,fcO,fcO 
700 DATAfcFF,fcFF,fcFF,lFF,fcO,iÛ,iO,iO,fcFF,bFF 
710 DATA&FF.fcFF,iO,fcO,fcO,fcO,fcFF,fcFF,fcFF,lrFF 
720 DATAfcO,fcO,W,iO,4fF,fcFF.tfF,iFF,liO,fcO 
730 DATAfcO,fcO,iFF,fcFF,fcFF,fcFF,fcO,iO,fcO,fcO 
740 DATAfcFF,fcFF,fcFF,fcFF,fcO,fcQ,fc0.kO,fcFF,fcFF 
750 OATAfcFF.fcFF.iO.fcO.fcO.iO.fcFF.fcFF.fcFF.iFF 
760 DATAiO,fcÛ,fcO,iO,fcFF,fcFF,fcFF,tFF,fc0.iQ 
770DATAiO,fcO,iFF,fcFF,fcFF,fcFF,fcO,iO,iÛ,fcO 
780 DATAfcFF.fcFF.fcFF.iFF.fcO.fcO.fcO.iû.iFF.bFF 
790 DATAfcFF,fcFF.i0,fcO,fcO,iÙ,fcFF,l l FF,fcFF,l.FF 
BOO DArAlQ.fcO.iO.fcO.fcFF.fcFF.fcFF.fcFF.fcO.fcO 
810 DATAfcQ,fc0,fcFF,fcFF,iFF,fcFF,fc0,l«0,Ml,fc0 
820 DATAfcFF.fcFF.fcFF.fcFF.fcO.fcO.fcÛ.fcO.fcFF.fcFF 
830 DATAiFF,fcFF,iO,fcO,iQ,iO,fcFF,fcFF,l.FF,I.FF 
640 DATAi0,i0,fcû,b0,fcFF,&FF.l£F,bFF,fc0,i0 
650DATAfcO,iO,i 1 FF,iFF,fcFF,bFF,faO,fcO l fcO,bO 
660 DATAfcFF.iFF.fcFF.tFF.fcO.tO.fcO.fcO.fcFF.LFF 
870 DATAiFF,fcFF,fcO,fcQ,iQ,fcO,fcFF,fcFF,fcFF,fcFF 



880 DATA40, 40, 40,10, 4FF,1FF,4FF,4FF. 40,40 
890 DATA40,40,4FF,iFF,lFF,4FF,i.Û,40,40,W 
900 DATA1FF,4FF,4FF, 1FF, 40,10, 10, W.4FF.4FF 
910 DATUFF,LFF,&O t bO,bO,trO,leFF,XiFF,l<FF,liFF 
920 DATA40,4Q,40,tQ,4FF,4FF,4FF,4FF,40,40 
930 DATAA0,40,1FF,1FF,4FF,4FF, 40, 40,40,10 
940 DATA4FF,4FF,4FF, IFF, 40,40, 40,40, 1FF.IFF 
950 DATA1FF.4FF, 40,40,40, 10,1FF,4FF,1FF,4FF 
960 DArAiO.Ml.iO.Ifl.IFF.tfF.tFF.iFF.MÏ.fcO 
970 DATA10,40,1FF,1FF,4FF,1FF,1Û, 40, 40,40 
980 DATA4FF,tFF,4FF,4FF,40,40 1 40,40,tFF,4FF 
990 DATA4FF,4FF,40, 40,40, 40, 4FF,4FF,4FF,4FF 
1000 DATA40,4O,4O,40,4FF,4FF.4FF,4FF,4O,4O 
1010 DATA10,4Q,tFF, IFF, 4FF,1FF,10, 40, 40,40 
1020 DATA4FF,lFF,lFF,4FF,t0,10,40,40,4FF,4FF 
1030 DATA4FF,4FF,40, 40,10, 40,tFF,4FF,fcFF,4FF 
1040 DATA40. 40,40,40, 4FF.4FF.4FF.4FF, 40,40 
1050 DATA40, 40, tFF,4FF,tFF,4FF,40,t0, 40,40 
1060 DAÎAAFF,AFF,1FF,4FF, 40, 40,40, 40,1FF,4FF 
1070 DATA4FF, IFF, 10, 40,40,40, IFF, 4FF, IFF, 4FF 
1080 DATA40,40,40,40,1FF,4FF,4FF,1FF,40,40 
1090 DATA10,40,1FF,4FF,4FF,1FF,40,10,40,40 
1100 DATA4FF,1FF,1FF,4FF,10.40,40,40,1FF,4FF 
1110 DATA4FF.1FF, 40, 40,40,40, 4FF,4FF,kFF,4FF 
1120 DATA4Q,10,tQ,40,lFF,4FF,4FF,tFF,40,40 
1130 DATAfcO,40,tFF,tFF,4FF,lFF,10,4Q,40,tO 
1U0 DATA1FF,1FF.4FF,4FF,10.40,40,40,4FF,4FF 
1150 DATA4FF,4FF,40,40,40,40,4FF,4FF 1 4FF,4FF 
1160 DATAAO, 40,40, 40,4FF.4FF,4fF,4FF,40, 40 
1170 DATA10, 40, tFF,4FF,4FF,4FF,40,40, 40,10 
I1BÛ DATAlFF,iFF,4FF,4FF,40,40,10,4O,tFF,4FF 
1190 DATA1FF,1FF, 40,40, 40,40, 4FF,4FF,tFF,4FF 
1200 DATA40, 40,40.40, 4FF,4FF,4FF,4FF, 40,40 
1210 DATAlO,10,4FF,tFF,4FF,4FF,40,40,tO,40 
1220 DATA4FF,àFF,lFF f 4FF, 40,40,10,40, 4FF.4FF 
1230 DATA4FF,4FF,40,40,tO,40,4FF,tFF,4FF,lFF 
1240 DATA10,10,10,lû,4FF,tFF,lFF,4FF, 10,40 
12S0 DATA10,40,tFF,tFF,4FF,4FF,10,4O,10,40 
1260 DATA1FF,IFF,1FF,4FF, 40,40,40,40, 4FF,1FF 
1270 DATA4FF,4FF,10,40,tO,40,AFF,tFF,4FF,lFF 
12B0 DATA10,40, 10, 40,4FF,4FF,4FF,4FF, 40,40 
1290 DATA40,40,tFF,4FF,4FF,tFF,10,40,40,10 
1300 DATA4FF,iFF,lFF,4FF,10,lû,40,lO,4FF,tFF 
1310 DATA4FF, 1FF, 10, 40,10, 40,4FF,1FF,4FF,1FF 
1320 DATA40,t0,4û,40,lFF,4FF,4FF,4FF,4O,4û 
1330 OAtA40 I 40,4FF,4FF,4FF.4FF, 40,40,40, 40 
1340 DATAIFF.AFF, 4FF.4FF, 40.40, 40,iÛ,4FF,4FF 
1350 DATA1FF,4FF,4Û,4Û,40,40,1FF,4FF,1FF,4FF 
136Û DArA4Û,lù,40,40.4FF,4FF,4FF,lFF l 40,10 
1370 DATA40,10,1FF,4FF,1FF,4FF,4Û,4Û,40,1Û 
1360 0ATA4FF.4FF.4FF, 1FF, 40, 40,10, 40,1FF,4FF 
1390 CA7AtFF,4FF,4Q,40,t0,4Q,4FF,4FF,4FF,4FF 
1400 DATAAO, 40, 10, 40,4FF,4FF,1FF,4FF, 40,40 
1410 DATA40,10,4FF,4FF,lFF,4FF,10,4O,40,tO 
1420 ÛATAAFF, 4FF,4FF,4FF,40, 40, 40,40, 4FF,4FF 
1430 DATA4FF,4FF, 40,10, 40,10, 4FF,4FF, IFF, 4FF 
14*0 DATAAO, 40, 10,10, 4FF,1FF,1FF,4FF, 40,40 
1450 DATA4Û,40 ) 1FF,1FF,4FF,4FF, 40,40,10,40 
1*60 DATAAFF,1FF,4FF,4FF, 10,40,40,40, 4FF.4FF 



|||||j 1470 DATA1FF.4FF, 10,40, 40,10, 4FF,4FF,4FF,4FF 

WsÊË 1*80 DATA1Q, 40,10, 40 ( 4FF,1FF,4FF,4FF ( 40, 10 

-'•'-< i*90 DATAlO.lO.lFF^F.tFF.iFF.tO.tO.tO.lO 

&Ê0 1S0 ° DATA4FF,1FF,4FF,1FF, 40,10, 40. 40.1FF.4FF 

i *_ : . 1510 DATA4FF,1FF,40,40,10,40,4FF,4FF,1FF,4FF 

^-'*'' 152û 0ATA10, 40,40, 40, 4FF,1FF,4FF,1FF, 40,40 

'$&£&■: 1630 DATA10,40,4FF,4FF,4FF,tFF,10,tO,10,40 

WÊËi 1540 0ArA4FF,lFF,4FF,4FF,40,40,40,40,4FF,4FF 

Ë|lj| 1S5 ° WTA4FF,lFF,4û,40,tO,40,15F,4FF,4FF,4FF 

WÊ 1560 DATA&0,10, 40,40, 4FF,4FF,4FF.fcFF, 40,40 

'*\V 1570 DATA10,40,4FF,4FF,4FF,IFF,40,AO, 40,40 

| ■;.»_ 1580 DArAAFF,lFF,4FF,lFF, 40,40,40. 40.4FF.4FF 

g , 1^90 DATA4FF,1FF, 40,40, 10, 40,1FF,4FF,1FF,4FF 

* So'T 160 ° DATAfc 0- 40, AïO, 10, 1FF, 4FF , fcFF , iFF . 40,10 
\mÊè 1610 DATA10,4Q,1FF,4FF, IFF, 4FF.10, 40, 40,10 
".7 1620 DATAAFF,4FF,4FF,4FF, 40,10, 40,40, 4FF.4FF 

lll 1630 DATA4FF,4FF,40,40,40,10,4FF,1FF,1FF,1FF 
.;'■■ V 1640 DATA40,40,40,40,4FF,4FF,4FF,4FF,40,40 

1650 DATA40,40,1FF,4FF,4FF,4FF, 40,40,40,40 
1650 DATA4FF,4FF,4FF,4FF,40, 40,40,10, 4FF.1FF 
1670 DATA4FF,4FF, 10, 40,40,40, 4FF,1FF,4FF,1FF 
1680 DATA40, 40, tO.lO.lFF.fcFF.lFF.tFF, 40,40 

WÈË 1690 DATA40,10,4FF,tFF,4FF,tFF,40,10,4Û,40 

* **C 17 °° DATAi,FF ' llFF ' l,FF ' iFir ' i0 'l''>,40,40,tFF,4FF 

1710 DATAtFF,4FF,4Q,4O,tû,40,lFF,4FF,tFF,4FF 

». . 1720 DATA40,4O,40,t0,4FF,4FF,4FF,4FF T 40,lO 

1730 DATA40,40,4FF,1FF,4FF,4FF, 10,40, 40,40 

>fâ'ï 1740 DATA1FF,4FF,4FF,4FF,10,40,40,40,1FF,4FF 

pll| i7S0 DATAtFF f U:F .l'0 l Wl,l'0,40,tFF I 4FF,iJ ; F,4FF 

* / B ; 1760 DATA40.10, 40,10, 4FF,1FF,4FF,4FF,40, 40 
"^w 177 ° t>ATA40,40,4FF,4FF,4FF,4FF, tû. 40,40,10 
tri^* 1?S0 0ATAtFF ' lFF ' Ilt:F ' iFF ' (l0 ' t0 . i 0.t0.iFF.4FF 
yMÊ, 1ÏM D *TA4FF,4FF, 40,40, 40,10, 4FF,1FF,4FF,1FF 
;s|€® 1600 DArAÈ0,à0,40,tO,4FF,4FF,AFF,tFF,4O,tO 
£<P0U ifllû DATA40, 40, 1FF,4FF,4FF,4FF, 40,40, 10,40 
gHE IfliÛ DATA4FF,iFF,lFF,4FF,10,40,tÛ,40,4FF,4FF 
«R 1630 DATA1FF,4FF, 10, 40,40,10, 4FF,4FF.4FF,1FF 
$ÊÊg 16*0 OATA40.40,40,40,1FF,4FF,4FF,1FF, 40,10 
fdp$& 1850 DATA40,10,4FF,1FF,4FF,1FF, 40,10, 40,40 
■0iî$: 1860 OATA4FF,1FF,4FF,4FF,40,40,40,40,4FF,4FF 
H|^ 1870 DATA4FF,4FF,10, 40,40,10, 4FF,4FF,4FF,1FF 
t^î, lûâO DATA10,40,40,40,4FF,lFF,lFF t 4FF,iO,40 

£^ 1890 DATA40,40,4FF,tFF,4FF,lFF,4O,10, 40,10 

&£ 1900 DATAAFF,AFF,1FF,4FF,40,40,40,4Q,4FF,4FF 

|||p 1910 DATA1FF.4FF, 40, 40,10, 40,1FF,4FF,1FF,4FF 

J$Bt m ° D™<MO,10,40,4FF,4FF,tFF,lFF, 40,40 

^|| 1930 DATA40,40, 10, 40,10, 40,40,410, 110,410 

■iïy'^ 1940 DATA410, 10,410,10,40.123,426,40,40,10 

%-$M 19S0 D "«0, 40, 40,416, 43C, 418, 418.13C, 118,10 

*&0% i960 DATAAO, 110, 136, 130, 138, 418, 438, 410, 40, 13* 

M0$ 197 ° HATA434, 48,110, 42C.12C, 40,10, 410,128, 410 

§§§11 19Bû D*'TAtl4,128,13*,10, 10.18,410,10, 40.40 

|Ép 1990 DATA10, 40, 10, 18,110, 410,110, 410,18,10 

W$M 2000 DATA40, 110, 48,16,48, 48,110.40,40, 40 

llllp 2010 DATA426, 110, 438,110, 428, 40,40, 10, 410,110 

f$È&. 2020 DATA438, 110, 410,40, 40,40, 40, 10.40,13 

■|j|$j$: 2Û30 HATA48,ttO, 40,10,40, 10, 438, 10, 40,10 

JfeJll 2040 DATA40,10.40,40. 40,410,410, 40,40,48 

SM# 2050 DATA4B,U0, 110, 420,120, 40,40, 438,426, 428 



2060 DATAb2B, &26, lc36, &0. LU, L10. &30, &10 T bl0 4 &iO 

2070 DATA138,10,10, 138, 126,18,138,120,138,10 
2080 DATA&O , &3S, L26, (kl S , JkS, &2B,I>38 4 10 , &û, L2Û 

2090 DATA628, fc28,fc38,&S, !£, LO.tÛ, 138,1.20 ,138 
2100 DATA&8, L2B , &38, Icû , &O f &36, &20, &36 , &23, &2B 
2110 0117*138.10,10,138,18,18,110,110,110,10 
2120 DATA10,138,12B, 136,128,128, 138, 10,10,138 
2130 DAÎA128,128, 438, 16,138, 10,10,10, MO, 10 
2140 DATAiO.iiO.lO, 10,10, 10, 18,10, 10, 18 
2150 DATAlS.llÛ, 10,10, 18, MO, 120,110,18. 10 
2160 DATAiO.tO, 10,138,10,138, 10,10,10, 10 
2170 DATA120, 110,18, MO, 120,10,10,138,128,18 
2180 DATA&10, &0, &10, bû, &O t blB, &2C, &3A, L2C, 1.20 
2190 DATAU8, 10,10, 110, 128,128, 138,128,128,10 
2200 DATA1Q, 130. 128.130,128.128,130, 10,10,138 
2210 DAÎA12B,12Q, 120, 126, 136, 10,10,130,126, 128 
2220 DATAIS, 128,130,10,10, 138,120,130,120,120 
2230 DATA138, 10,10, 138, 120,130,120,120,120,10 
2240 DATA10, 138,120,120, 126, 12B, 136, 10,10, 128 
2250 DATA128,138, 128,128, 128, M), 10, 138,110, 110 
2260 OATAllO.ltO, 138,10, 10,18,18,18,128,128 
2270 DATA138, 10,10, 128, 128,130,128,128,128,1(0 
2280 DATA10.120, 120,120,120,120,138, 10,10.128 
2290 DATA138, 128, 128,126, 12a, 10, 10, 138,128, 128 
2300 DATA128.12B, 128,10,10,138,128, 128,126, 128 
2310 DATA13B,10, 10, 138, 128, 128,138,120, 120,10 
2320 DATA10.138, 126, 128,128,136, 136,18,10,138 
2330 DATA128.128, 130,128, 128, 10, 10,138,120,138 
2340 DATAIS, 18,138,10,10. 138,110,110,110, 110 
2350 DATA110, 10,10, 128, 128,128, 128,126, 138.10 
2360 DATA10.128.12B, 128, 128,110, 110, 10,10, 126 
2370 DATA128.128, 128,138,128, 10,10, 128,128, 110 
2380 DATA110, 128, 128, 10, 10, 126, 128, 126, 110, 110 
2390 DATA110, 10,10, 138, 18, 110,110,120, 138,10 
2400 DATA10, 138,120, 120, 120, 120,136,10,10, 120 
2410 DATA120.110, 110, 18,18, 10,10, 138,18, 18 
2420 DATA18.16.13e, 10,10,110.138, 136,110, 110 
2430 DATAilO.lO, 10,10, 10, 10, 10,10, 10, 13C 
2440 DATA10, 110, 18,10. 10,10, 10.10,10,10 
2450 DATA138, 18,138,128, 138,10,10,120,120, 138 
2460 DATA12B.128, 138,10. 10,10, 138,120, 120, 120 
2470 DATA138,10, 10, 18,18, 138,128, 128,138, 10 
2480 DATA10, 10, 138, 128.138,120, 138, 10.10. 118 
2490 DATA120,130, 120,120, 120,10, 10,10, 138,128 
2500 DATA128, 136, 18, 138, 10, 120, 120, 138, 128, 128 
2510 DATA12B,10, 10, 110, 10, 110,110, 110, 110,10 
2520 DATA10, 16,10,18,18, 16.128.138,10,120 
2530 DATA120,128, 130,128, 128, 10, 10, 110, 110,110 
2540 DATA11Û, 110, 18,10, 10.10, 128, 138, 128,128 
2550 DATA12B, 10, 10, 10,130, 128, 128,128, 128, 10 
2560 DATA1Û, 10,138, 12B, 128,128.138, 10,10,10 
2570 DATAi38,t28,128,138,120, 120,10, 10,138, 128 
2580 DATA128, 138, 18.1C, 10.10, 11B, 120,120, 120 
2590 DATA120.10, 10,10, 138,120,138,18,138,10 
2600 DATA10.11Û, 136, 110.110,110,116,10,10,10 
2610 DATA128.128, 128, 128, 138, 10, 10,10, 128, 128 
2620 DATAt26.128,110,10, 10,10.128,128,126, 138 
2630 DATA128, 10,10, 10,128,128, 110,128,128, 10 
2640 DATA10, 10. 128, 128. 128,136,18,138,10, 10 






•;v..-' 



2650 DATA138, 18,110, 120, 138, 10,10, 118, 110,120 
2660 DATAiiO, 110. 118,10, tO.llO.llO, 110. 110, 110 
2670 DATA110, 10, 10. 130,110, 18, 110, 110, 130, 10 
2680 DATA10, 114,128,10.10.10,10,10,10,10 
2690 DATA10.10, 10, 10, 10,10, 10,10, 140,14 
2700 DATA144,144,10,140,10,10,1A0.1A,10,10 
2710 DATA10,lÛ,tQ,tO,160,tF,166,166,tF,160 
2/20 OATA10,t0.14Û,lE,lCC,iEE,16,lEO,l40,tlO 
2730 DATA1D0,1D, 122,144,18,160, 10,10, 140.1A 
2740 DATA144, 155, lA,lDO,10,tO, 120,14, 10,10 
2750 DA7A10, 10, 10, 10,120,14, 144, 144,14, 120 
2760 DATA10, 10,140, 12,122,122,12,140,10,10 
2770 DATA10,1A,144,1EE,14,1AO,10, 10,10, 14 
2/80 DATA144,1£E,14, 140,10,10,10, 10,10,10 
2790 DATA12.120, 140,10, 10,10,10, 1EE, 10,10 
2800 DATA10, 10,10, 10,10, 10,14, 140,10, 10 
2810 DATA120.12, 144, 144, 16, 180,10,10,140, 1A 
2820 DATA1AA,1AA,1A,140,10,10,140,1C,144,144 
2830 DATA14,1EO,10,10,1EO,1A,122 I 1EE,18,1EO 
2840 DATU0,10,lE0,lA t 16Ë,122 < lA,l£0, 10,10 
2850 DATA180,1A,1AA,1EE,12,120,10,10,1EO,16 
2860 DATAlEE,122,lA,t£0,lO,t0,iE0,18,lEE,tAA 
2870 0ATA1A, IEO, 10, 10, IEO, 12,122, 144, 14, 140 
2380 DArAiÛ,tO,lEO,lA T lEE,tAA,!A,lEÛ, W.tO 
2890 DATAt£0,!A,lAA,lEE,l2,t£0,tO, 10, 10,14 
2900 DATA10, 10, 14,10, 10,10,10, 12, 10,10 
2910 DATA12, 120,140, M), 10,12,144,188,14,120 
2920 DATA10,10,10.10,1EE,10,1E,10,10,10 
2930 DATA1Q.18, 144,122,14,180,10, tO,tE0,tA 
2940 0ATA122,1U,10, 140,10, 10,160,18, 1DD.1BB 
2950 DATAIS, 160, 10,10, 140.1A, lAA,lEE t lA,lAO 
2960 DATA10,10,LC0,1A,1CC,1AA,1A,1C0,10,10 
2970 DATA1EO,1A,188,1B8,1A,1EO,10,10,1CO,1A 
2960 DATAlAA,lAA,lA,lCÛ,10,10,lE0,lB,lCC,18e 
2990 DATAtS.tEO, 10, M),IE0,1B, ICC, 188,16, 160 
3000 DATA10,10,1EO,18,188,1AA,1A,1EO,10,10 
3010 DATAlÀO,lA,tEE,lAA,tA,lAQ, 10,10, 1E0.14 
3020 DATA144,144,14,1E0, 10,10,120,12, 122.&AA 
3030 DATA1A.1EÛ, 10,10, 1AO,1A,1CC,1AA,1A,1AO 
3040 DATA10, 10, 160, 18,188, 188, 18, 1E0, 10, 10 
3060 DATAlA0,tE,tAA,lAA,lA,lAÛ,M),10,tEQ,lA 
3060 DATA1AA,1AA,1A,1A0,10,10,1E0,1A,UA,1AA 
3070 DATA1A,1E0,10,10,1E0,1A,1AA,1EE, 18,180 
3080 DATA10,10,1EO,U,1AA,1AA,1E,1EO,120,10 
3090 DATA1EO,1A,1AA,1CC,1A,1AO,10,10,1EO,18 
3100 DATA1EE, 122, 12, 1E0, 10,10, 1E0.14, 144, 144 
3110 DATA14, 140, 10,10, 1AÛ,1A,1AA,1AA,1A,1E0 
3120 DATAtO,iO,lAO,lÀ,tAA,iAA, 14, 140,10, 10 
3130 DATAlAD,U,lAA,lAA,lE,lAO,tQ,lO,tAO,tA 
3140 DATA144,144,1A,1AO,10,10,1AO,1A,1AA,144 
3150 DATA14, 140,10, 10, 1E0, 12,144, 144, 18, IEO 
3160 DATA10, 10, IEO, 18.188, 188.18.1E0, 10.10 
3170 DATA160,ia,144 l 144,12,120,10,10,lE0,12 
3180 DATA122, 122,12, IEO, 10, 10.140, 1E.1EE, 144 
3190 DATA14, 140,10,10,10, 10,10,10, 10, 10 
3200 DATA1F0, 10,140, 12, 10, 10,10,10, 10, 10 
3210 DATA10,1E,122,1EE,1A,1E0,10, 10,180, 16 
3220 DATA1EE,1AA,1A, IEO, 10, 10,10, 1E, 188,188 
3230 DATA18,lF_0,lO,iO,120,12,lEE,lAA,lA,tEQ 



3240 DATA&D, fcO, &0, b£, fcAA, 4EE, SiB, i£0, feO, bO 
3250 DATA160,t8,irCC,t88,iB,t80,M,fcO,M,lE 
3260DATAlAA,tAA,lE,t2Q,tEO,M,180,18,tE£,iAA 
3270 DATAIA.IAO, M, 10, 140,10,144, 144, 14, 140 
3260 DATAtO,40,fe20,àO i 622 1 fe22,î<2,iAO|fe£0,feO 
3290 DATA180, 18, 4AA, ICC, 4A,1A0, 10,10,140,64 
3300 DATA144,i44,l4,t20,M,tO,10.1A,t£E,tAA 
3310 DATAlA,lAO,M,tt,lQ,W,iAA,lAA,U,tAO 
3320 DATAiO,iO,M,tE,lÀA,tAA,tA.t£0,M,10 
3330 DATAlO,lE0,4A,lAA,tE,i80,160,H),M,tE0 
3340 DATA1A,1AA,1E, 420, 430,10.10,160,18,188 
33SO DATA18,t60,M,tO,4O,tE0,t8,lEE,12,4EQ 
3360 DATA10,t0,140,tE0.64.i44,14,MÛ,M,tO 
3370 DATA10,4AO,1A,1AA,4A,1EO,10,40,40,1AO 
3380 DATAlA,iAA,tA,t40,tO,&Q,tO,lAQ,tA.4AA 
3330 DATAtE,M0,«,W,W,ftA0,U,l 1 44,iA ( MO 
3400 DATA40,lû,4O,lAÛ,lA,6AA,iE,420,lE0,4O 
3410 DATAM, 1E0, 42,444, ie,lEO,10,lO,160,t4 
3420 DATA4BB,&44,&4, 460.10,40,440,14, 444,144 
3430 DATA44,140,10,M,lCO,14,122,144,t4,KO 
3440 DATA10,iO,150,tA,tO,10,M,M,10,M 
3450 DATA10,M,M,M,tO,tO,W,10,M,fc4O 
3460 DATA140,44,14,40,444,10,M,iA0,lA0,10 
3470 DATAM, 10, 10,10, tO,t60,lFO p t6,i6,lFF 
3480 DATAl66,l0,W,140,4EQ,lC,lE,166,t£E,144 
3490 DATAM,!!»,!!», 12,14, 1BB,1BB,10,M,140 
3500 DATA1A0,14,15,1AA, lDD,H>,M,t20,!40,M 
3510 DATA10,lO,tO,M,iO,l20,140,14,14,t44 
3520 DATAt22,tO,M,t4û,t20,l2,t2 1 422,144 1 M 
3530 DATAM,M,1A0,14,1E,144,1AA,1Û,M,10 
3540 DATA140, 14, 1£, 144. 144.M, 10, M, M, 10 
3550 DATAM,122,122,144,M,M,10,10,1E,L0 
3560 DATAIO, 10,10,10, 10, 10,10, 144,144,10 
3570 DATA10,120,120,14,14,188,188,M,10,140 
3580 DATA6A0,tA,tA,lÀA,t44,10,i0,t40,4CQ,14 
3590 DATA14,144,1EE,M,M,1E0,1A0,12,1E,1&8 
3600 DATAlEE,40,M,tE0,U0,t6,l2.iAA,tEE,10 
3610 DATAM, lB0,SA0,lA,tE,l22,122,( 1 û,M,lE0 
3620 DATA180, 1E, 12, 1AA, 1EE, 10, M, 1E0, 180, 1E 
3630 DATA1A,1AA,1EE,M,M,1E0,120,12,14,1U 
3640DATA144,tO,M,tEO,lAO,t£,lA,lAA,4££,W 
3650 DATA10,1EO,1AO,1A,1E,122,1EE,M,M,M 
3660 DATA140,M,M,144,M,10,M,10,120,M 
3670 DATAM,122,122,144,M,M,120,14,16,144 
36B0 DATAl22,10,10,M,M,lE,10,tEE,M,10 
3690 DATA10,M,ieO,14, 12,144, iaB,U,M,lEO 
3700 DATAlA0,12,14,M,144,!0,M,t<6O,lBO,M 
3710 DATAlB,iae,166,M,M,&40,UO,lA,t£,lAA 
3720 DATAtAA,10,M,lC0,tA0,tC,tA,tAA,iCC,W 
3730 DATAtO,tE0,tA0,18,t8,lAA,lEE,M,M,tC0 
3740 DATAtAO,tA,tA,tAA,4CC,W;tO,l£0.180,tC 
3750 DATAt8,l88,tEE,M,M,l£0,t&0,K,18,ie8 
3760 DATA168,10,M,lE0,t6O,tB.Ul,lAA,tEE,M 
3770 DATAM, SAO,lAO,tE,lA,tAA,tAA,M,M,lEO 
3780 DATA140,14,t4,t44,tEE,M,t0,120, 120.12 
3790 DATAlA,lAA < lEE,M,M,lA0,tAO 1 tC,lA,lAA 
3800 DATAlAA,i0,10,180,18O,18,18,l88,tEE,W 
3810 DATAM, tAO,lEO,lA,lA,tAA,lAA,lO,tO,lEO 
3820 DATA1A0, 1A, 1A, 1AA, 1AA, M. », 1E0, 1A0. 1A 



?&£* 3830 DATAlA,UA,lEE,M,10,fcE0 t lA0,lA,tiE,18a 

* : tiïj3 36W MTUlB 8'W,M,tEO,lA0,tA,iA,tEE,tEE,t22 

WÊÈ 38S0 E>ATAM,&EO,1AO,1A,1C,1AA,1AA,M,10,1EO 

WÊË 3860 DATA18û,lE,12,t22,tEE,M,10,tE0,140,W 

**■ ; 3870 DATA14,144,144 I M,M,1A0,1A0,U,1A,1AA 

•ty '. 3880 DATAlEE,M,10,lA0,tA0,tA,lA,144,l44,M 

" t 3890 DATAM,1AO,1AO,1A,1A,1EE,1AA,M,U,1AO 

"l 3900 DATA1AO,14,14,1AA,1AA,10,M,UO,1AO,1A 

WÊÈ 3910 DATA14,144,144,M,M,bE0,120, 14,14, 188 

WjÊM' 3920 ÛATA1EE,M,10,1EO,180,18, 18,188, (£E,M 

||f$y 3930 DATAM.IBO, 180,14, 14, 122,122,t0,M,tE0 

£«*#> 3940 DATA620,12, 12, 122, 1EE,M, 10,140, 1E0.1E 

'•, . 3950 DATA14,144,S44,M,M,W),10,W,M,M 

3960 DATAM, lFF,M,t40,120,10,10,M,M,10 
*«* 3&70 DATAfcO,tO,tEO,t2,lE,lAA,t£E,M,M,180 

*- 3960 DATA160,1E,1A,1AA,1£E, 10,10, 10.1E0, 18 

* ■• 3990 DATAIS, 188,1EE,M,M,120,120,1£,1A,1AA 

4000 DATAlEE,M.M,10,&EO,lA,lE,18S,bEE,M 
4010 DATAIO.KO, 180,10, 16,168,188,10,10,10 
^ ' ' 4020 DATA1EO,1A,1A,1EE,122,1EE,M.1BO,MO,1E 

\' 4030 DATAU,1AA,1AA,M,M,140,M,14,14,144 

4040 DATA144.M, M, 120, 10, 12, 12,122, 1AA, 1EE 
WSg 4050 DATAM,18O,180,lA,tC,lAA,tAA,tt0,M,t4O 

f^P *060 DATA140.14, 14,144, 122,tO,tO,40,iAO,tE 

4070 DATA1A,1AA,1AA,M,M,10,1C0,&A,1A,1AA 
4080 0ATA1AA,M,M,10,1E0,&A,1A,1AA,1EE,M 
4090 DATAM,M,lE0,UO,lA,l£,18fl,lB8,M,M 
4100 DATAtE0,lA0,lA 1 l£ l 122,t33,tO,M,t60,180 
4110 DATAl8,ta,188,W,M,W,lE0,t80,lE,12 
4120 DATAlEE,!0,W,t40,lEO,t40,l4,14,t66,M 
4130 DATAfc0,M,tAO,tAQ,tA,lA,lEE,M,M,tO 
ÉF&* 41 *° DATAtAO,tA0,lA,tA,lU,M,W),M,tAO,tA0 

l'Sfe' 4150 DATA1A,IE,1AA M 10.M.lA0,tA0,14,tA 

;|^$$ 4160 DATAlAA,10,M,tO,lAO,tA0,lA,tE,622,tEE 

'$£ j, 4170 DATAM,M,l[E0,12,14,M,l£E,M,t>0,160 

•SB § 4180 DATA140,18,14,144,166,M,10,140,140,U 

'..;■■,' 4190 DATA14,144,144,M,M,1CO,140,12,14,144 

4200 DATA1CC,M,M,150,1AO,M,10,M,M,M 
WÊÊ® 4210 DATAM,M,10,M,10,W),M,ltO,M,M 

1^,\- 4220 DATAS4O,140,140, 140,10,140, M.IO.IAO.IAQ 

*&**'* 4230 DATAM,10,M,M,M,M,t60,lFO,t60,t60 

'"^t'*îï 42 *° DATAfcF0 > M M0,W,l40,tE0,tCO,4E0,46O,lEO 

JL ?* 425 ° »ATA140,M,1D0,U», 120,140,160, 1B0,M,M 

^jfjïjj 4260 DATA140,1AO,140,150,1AO,&DO,M,10,120,140 

MW$à 427 ° f>ATAM,M,10,M,10,M,120,140,140,140 

V"3|^ 4280 DATA140,120,M, 10,140,120,120,120,120.140 

&$:'; 429 ° MTAt °i i 0,M,tA0,t4O,lEO,l40,lAO,M,M 

4300 OATAM,140,140,l£0,140,140,10,10,bO,M 
'$0$ 4310 DATAtO,M,t20,t20,140,M,iO,M,M,fcEO 

ljfefr> «320 DATA10,10,feO,M,10,M},M,40, 140,140 

g^g 4330 DATA10,M,t20,t20,140,t40,t80,t80,M,M 

$£%& 4340 DATA1EO,1AO,1AO,1AO,1AO,1EO,M,M,140,1CO 

^H 4 350 DATA140,140,14O,lE0,10,M,lE0,lA0,t20,lEO 

m%M. 4360 DATA180,tEO,M,M,tEO,tAO,160,t20,lA.O,lEO 

WËÊ 4370DATAM,10,180 1 tAO,tAO,tEO,120,120,M,M 

œSjB 4380 DATAlEO,180,lEO,120,tAO,lEO,W),W,t£0,180 

gj&£@ 4390 DATAlE0,tAO,lA0,l£0,M,M,tEO,S20,12O,140 

|# 44 W DATA14O,140,M,M,tE0,tA0,l£0,tA0,lA0,lEO 

%&$& 4410 DATAÎr0,M,tE0,tAO,lA0,tE0,12O,tE0,M,W) 



4420 DATA10.440, 10, 40,140,40,10,10,10,120 
4430 DATAfcO.iO,i(20, 120, 140. 40,10,420,140,480 
4440 DATA140, 120,40, 40,10,40, S£0,40,IE0,40 
4450 DATA10, 40, 40,160, 440,120, 140,180, 10,40 
4460 DATA1E0.4A0, 120,440, 10, 440,10,40,160,480 
4470 DATA4M,lBÛ 1 480,460,40,tO,44Q,tAO,4AO,lEO 
4460 DATA4A0,iA0,40,10,4CO,lAQ,4CO,lA0,lAO,4C0 
4490 DATA10,40,lEO,4AO,180,4aû,lAO,lEO,40,40 
4500 DATAlCO,4AO,lAO,4AO,lAO,tCQ,10,40,tEO,480 
4510 DATA4CQ,18Q,4a0,4E0, 40,10, 4E0, 480, 4C0, 160 
4520 DATA1B0, 180, 40,40, 4E0, 180, 480,1A0,4A0,1E0 
4530 DATA10,40,1AO,4AO,1EO,4AO,1AO,1AO,4Q,40 
4540 DATA4E0. 440, 140,440,140, 4E0,40,10,420, 120 
4550 DATA120,4AÛ,4A0,1E0, 40,t0,4AO,tAO,4C0,4AO 
4560 DATA1A0.1A0, 40,40,160,460, 480, 46O.480.1E0 
4570 DATA40,10,4A0,4E0,lAQ,t(A0,lAO,4A0,10,4O 
4560 DATA4E0,4AO,tA0 1 4AQ 1 tA0.1A0,t0,4O,lE0,lA0 
4590 DATA4A0,1A0,4A0,4E0, 10,10, 1E0,4A0,1AQ,4EÛ 
4600 DATA48Q,480,4Q,40,1EO,1A0.4AO,4AO,1EÛ,4EO 
4610 DATA120,40,1EO,4AO,1AO,4CO,4AO ( 1AO,40,1Û 
4620 DATA4Ë0,480,4£0,420,12Û,1E0,40,10,4E0,140 
4630 DATA440, 140,440,440, 40,10, 1AO,4AO,1AO,4AO 
4640 DATA4A0.1EO ! 40,10,4AO,1AO,4AO,4AO,140,44Û 
4650 DATA10, 40, 1A0,4A0,1A0,1A0,4E0,1A0, 40,10 
4660 DATAlAO,4AO,440,140,4AO,lAO,40,bO,4AÛ,lAÛ 
4670 DATA1A0.440, 140,140, 10, 40.1E0, 120, 140, 140 
4660 DATA48O,4E0,10,40.1EO,46O,lBO,lBO,480,lE0 
4690 DATA40, 10,180, 180, 4*0,140, 120,420,10, 40 
4700 DATA4E0, 120, 420,420, 120,4E0,t0,4O,440,4E0 
4710 DATA1E0, 140,140, 140, 40, 10,40, 10, 40,10 
4720 DATA10,10,1FO, 40,140,420,40,40, 40,40 
4730 DATA40,40,4O,lE0,12û,4E0,lAO,4E0, 40,40 
4740 DATA180, 460, 1E0, 1A0, 4A0, 1E0, 40, 10, 40. 1E0 
4750 DATA480,180,480,4EO, 10,40,120, 420,1E0,4A0 
4760 DATA4AO.1E0, 40,10, 4O,lE0,4A0,4E0,160,4E0 
4770 DATA10,40, 160, 480,400,160, 480,180,10,10 
4760 DATA10,4EO,1AO,1AO,4EO,120, 1E0, 40,160,480 
4790 DATAlEO,4A0,4A0,tA0,40, M, 440,10, 440, 140 
4600 DATA140,440. 40, 40, 120,40,420,120,420, 4A0 
4810 DATA4E0, 10, 480,480, 1A0,4C0,4A0,1A0, 40,10 
4820 DATA440, 140, 140,440, 140,120, 40.W.40, 1A0 
4830 DATA1E0,1A0,4A0,4A0, tO,tO,10,JiCO,kAÛ,lAO 
4640 DATA4A0.4AO,40.10,40,1EO,4AO,4A0.1AO,4EÛ 
4650 DATA10,40,t0,4E0,4A0,4AO,4E0, 180, 180,40 
4860 BATA10.iE0.1AO,4AO,l<EO,120,130. 40,10, 460 
4870 DATÀ480.180, 180,180,10, 10, 40, 1EO,4BO,1EO 
4880 DATA420.1E0,10, 40.140, i£0,440,14Q, 440, 160 
4B90 DATA10,4O,tO,4AÙ,4A0,lAO,4A0,4E0,lQ,4O 
4900 DATA10,1AO,1AO,1AO,4AO,140,10,40,10,1AO 
4910 ÛATA4A0,1A0,1E0,1A0, 40, 10,10, 1A0,4A0, 140 
4920 DATA4A0, 1A0, 10, 40,10, 4AO,tAO,tA0,4E0,420 
4930 DATAt£0,40.tO,4EO,420,140,l80,4EO,10,4Q 
4940 DATA460, 440,160,140,440,460,40,40,140,140 
4950 DATA440, 140, 140,140, 40, 10, ICO, 140, 120,440 
4960 DATA140,iCO,40,tO,450,4AQ,tO,10,4Q,M> 
4970 DATAfcO,4û,tO,40,41,4Q 
4960 ' Application et utilisation 
4990 ' du prograiie CARACT 



5000 ' 

5010 DATA43E,402,4CD,10E,1BC,1CD,402,1BC,43E,101,4CD,19Û,4BS 
,416,401, UE,420,4CD,4AB t 4BB,lC9:RESTQRE 5Q1Û:FBR 1=4100 TO 
4il4:READ A:PQKE i,A:NEIT 
5020 BOSDfLB OilNK 0,0 

5030 MODE 1:CALL 17970:INK i, 14: INK 4,2:PEN kPRINTCARACT t 
C) 1989 ";CHKt(34i;:PEN 2:PRINT"AflSTAH 4 CPC ";:FEN 1:PR1NT" 
et';:PEN 3:PftlHT" S.SH"::PEN llPRIHT CHRIl34>:PRINT:PRlNT*Ec 
riture 40 Colonnes en iode 0":PRIHT:PEN 3 : 1 NK 3.10:1NS 12,9: 
PRINT"Stylo 3" 

5040 1HK 2, 15: INK B,6:PEN 2:PRlNÏ"Stylo 2';PEN l:PRlhT"Stylo 
l':PEN 2:PB!NT:PRINT"Appuyez sur une touche":CALL 1BB18:I10D 
E 2:PEN UCftU. 17982: INK 1,2:!NK 2,14: INK 3,26:G0SUB SO90:PH 
!NT:PR!NT"HQDE 1 EN 60 COLONNES avec un stylo de 3 couleurs* 
:GOSUB 5080 

5050 HODE 2:CALL 479B4:INK 1,26:G0SUB 509O:PRiNT:PHINHf0DE 
1 EN BO COLONNES avec 1 stylo de 1 couleur*:G05UB 5Q80:HÛDE 
2:CALL 4799BMNK 1,6: (NK 2,15: LHK 3,25:G0SUB 5030:PB1NT:PE]N 
T"HODE 1 EN 60 COLONNES avec 1 stylo en dégrade de 3 couleu 
rs'iGÛSUB 5060 

5060 HODE 2:ltK 1,9:1NK 2 T 18;1NK 3,26:CALL 4799B:G0SUB 5090: 
PRlNT:PRlNT"ïous pouvez aussi si vous le desirez coibinez le 
s 3 iodes 80 colonnes':PSlNT:PBlNT"En voici ";:CALL 179B4:PB 
INT'un "::CALL 47982:PRINT , eieip)e !";PRINT:PRINT'APPUYEZ SU 
S UNE TOUCHE* 
5070 CALL 4B818:G0T0 5100 

5060 PRINT:PBlNT"vous pouvez utiliser directeient ce iode da 
ns vos ptogranes*:PEINT:PB[NT"Appuyez sur une tauche":CALL 
4BB18:BnURN 

5090 PBINT-CABACT (C) 1989 ";CHRH34t;»AHSTA6 4 CPC et S.SH" 
;CHR*(34):RETURN 

5100 CALL 4100:G05UB 5090:PElNT:Pfi]NT"irous pouvez aussi si v 
ous le voulez revenir au iode 2":PBlN7"avec les encres et ca 
racteres inLtiaui":PRINT:PRlNT"Appuyez sur une touche':CALL 
bfiBIB: LHK 0,0:B0EDER 0:HÛDE 2:GÛSl)B 5090;PR1NT 
5110 PBlNT'Un iode avec une ligne sur deui , c'est possible 
et ceci dansVPBIKT'tous les iodes et avec la tonte de caiac 
teres":PRINT"que vous voulez ! En voici un eieiple ":F0fi 1=1 
TO 1 000 :NEÏT: HODE 2:CALL 178F1:G0SUB 5130:HODE 1;CALL 47900 
:G0SUB 5130 

5120 HODE 0:CALL 479OF:G0SUB 5130:G0T0 5140 
5130 PRINT'Voici un eieiple tout siiple !':PBINT:PRINT'APPUY 
EZ SUR UNE TÛUCHE":CALL 1BB18:CALL 17928:F0B NI TO 10O0:NEÏ 
T:R£TURN 

5140 HODE 1:CALL 17970: INK 1, 14: 1NK 4,2: INK 3,1B:INK 12.9: iH 
K 2,15: iNK 8,6:PEN l:PBlNT*0n peut leie coibiner ce iode ave 
c":PEM 2:PRINT'Le jeu de caractère en HODE OVPRINT'avec 40 
colonnes*:PEN 3; PRI NT" Appuyez sur une toucheVCALL &8B18:CAL 
L 47900 :PEN 1 

5150 PR[NT:FRIHT:PR[NT:PRIHT:PRihT*Appuvez sur une touche";C 
AU 4B618:CALL 17926:H0DE 2;PEN 1:CALL 17962:1NK 1,2:!NK 2,1 
4:IHK 3,26:PRINT a 0u les w>des 1 coibines avec 60 colonnes":P 
RlNT:PRINT"En voici ";:CALL 179B4:PRINT"un ';:CALL 17962:PE1 
NT'eieiple !" 

5160 PB 1NT: PB! NT" APPUYEZ SUB UNE T0UCHE":CALL 478F1:CALL IBii 
18:CALL 47928:G0TQ 5030 



TRUCS & 
ASTUCES 
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GLASNOST 

SUR «PERESTROÏKA» 



I M. Alain Demoy très Intéressé par 
le programme Perestroïka paru dans 
le n° 38 d'octobre 88 (Le dernier n° 
de CPC snlO. nous propose une pe- 
tite modification. A l'origine, le pro- 
gramme n' «efface» une ligne sur 
l'écran que si cette dernière est com- 
plète et se trouve tout en bas. Grâce 
aux quelques lignes de Basic ci-des- 
sus, le programme «effacera» une li- 
gne quelque soit sa position dans la 
fenêtre de jeu. à condition bien sûr 
que cette ligne soit complète. 
1050 nolr=0:FORz=lTO14 
1065 FORh=1TO10 
1060 IFTEST(232+(h-16).88+(z'16))=0 
THEN nolr=nolr+l 
1065 NEXTh 

1070 IFnolr=0THÈNGOSUB1087 
1075 IFnoir=10THEN1085ELSEnoir=0 
1080 NEXTz 
1085 GOTO 1130 
1087 WINDOW#3, 16,25.2,20-z 
1120 sc=sc+85:GOSUB 1470:llgne= 
llgne+l:GOSUB1510:z=z-l:RETURN 



I 



TRANSFORMATION 



I Voici un programme qui permet 
la récupération des programmes bi- 
naires et leur transformation en pro- 
gramme Basic avec des lignes de Da- 
tas. N'oubliez pas de charger aupa- 
ravant les programmes binaires et 
faites attention aux conflits de mé- 
moire I Cadeau de Laurent Rizzo. 

10 clsiprint» TRANSFORMATEUR» 
20 print;lnput»nom du programme 

binaire : « ,nS 
30 lnput»mémory : « .m 
40 lnput»adresse de départ : « ,a 
50 lnput»adresse de fin : « ,t 
60 memory m:toad nS 
70 print» 10forx=»;a;»to«;l;»step8:for 

t=0to7:readaS 
80 print» 20 a=val(«;chrS(34) ; «&»; 

chrS(34) ; «+aS) : pokex+t,a:next: 

next 
90 Ifl=0thenl=hlmem-1 
100 e=100:for x=a to I step Sprint e ; 

«DATA «;:for t- to 7:prlnthexS 

(peek (x+t) ) ;»;»:next:print spaceS 

C5):e=se+10:next 



UN PEU D'ANIMATION 

L'article du n° 27 {Amstar & CPC) 
de M. Archambault semble manquer 
de quelques précisions concernant le 
464. M. Yves Mlnot nous apporte quel- 
ques compléments d'Informations : 
• En ce qui concerne le programme 
SALOON. Il faut préciser que les com- 
mandes DRAW, PLOT, PLOTR accep- 
tent effectivement les arguments x, y 
pour déterminer les coordonnées du 
point, ainsi q'un troisième argument 
pour la couleur de I encre. (Exemple : 
ligne 150 DRAWR -30, 0, 0) 
Par contre, cet argument après les 
commandes MOVE et MOVER n'est 
pas compatible sur 464 et 664 mais 
seulement sur 6128. Il faut donc (ligne 
140 par exemple) déplacer cet argu- 
ment surla commande DRAWR. com- 
me II est fait ligne 160. 
Pour le listing BOMBARDEMENT, j'ai 
trouvé une petite combine pour re- 
médier au problème signalé page 33 
(pas d'Impact : la bombe n'en finit 
pas de tomber puisque le trait est trop 
mince). 

J'ai rajouté quelques lignes : 
9005 DATA 52, 102, 132. 1 12, 92, 82. 
102. 112,82,62.82, 112, 102 
9042 PLOT 0,42 

9045 RESTORE.FORx=50TO 650 STEP 
50 

9047 READy : DRAWx.y, 1 : NEXT 
et235GOSUB9000 
(Pour retracer le contour après l'Im- 
pact). 
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BILLY LA BANLIEUE II 



Le programme «Bllly la banlieue 
n" 2* paru dans le numéro 34 du ma- 
gazine Amstar & CPC. page 67, pré- 
sente quelques bugs. En effet, à cer- 
taines lignes se trouvaient des carac- 
tères de contrôle. Ceux-ci n'ont donc 
pas été Imprimes et ont été rempla- 
cés par des espaces. Voici donc les 
modifications à apporter. 

• Ligne 290 : ptiS=clYS(141)+chr$(10+ 
chrS(8)+chrS{142) 

• Ugne310:lapS=chrSC145}4ChrS(10)+ 
chrs(8)+chrS(146) 

. Ugne 4060 : amcS=chrS(9)+co$+ 
chrS(8)+chrS(8)+chr$<10)-t-coS+» 
«■K:oS-K:hrS(S)+chrS(8)+chrSC10)+bdlS 

• Ligne 4070 : amcl$=chrS(9)-K:o$+ 
chrS(8)+chrS(8)+chrS(10)+co$+» 
«+chfS(8)+chrS(8)+chrS(l 0)+bgl S 



D'autres modifications : 

• 210 defint a-z:mode 1 :gosub 3510 

• effacer la ligne 10 et taper la ligne 
suivante : 

2181 ga=8:dr=l:ha=0'.ba=2:qu=47 

• pour les lignes 710 à 800 rajouter 
:goto 820 (, à la fin de chacune de 
ces lignes) 

• Taper : 

480 mode 1 :lnk 3 Alnk 0, 1 :INK 1 , 24:INK 
2,11 

remplacer le * PEN#1 .7* de la ligne 
490parPEN#1.2 

Les couleurs sont alors plus supporta- 
bles. 



LETTRE. S RETRECIES 

Dans le n° 29, rubrique «Trucs et 
astuces», un lecteur demande com- 
ment écrire du texte en mode 1 dans 
un dessin en mode 0. 
Je ne crois pas la chose possible 
(NDLR : si c'est possible, voir ce numé- 
ro),)! existe différents programmes pour 
élargir des caractères. Jamais pour les 
rétrécir, ce qui explique : en mode 0. 
un point s'affiche toujours sur 4 pixels, 
S'il existe réellement un truc. Je serai 
ravi, moi aussi, de le connaître. 
Quoi qu'il en soit, mon truc person- 
nel est le suivant : 

Je redéfinis les caractères dont J'ai be- 
soin, sur 3 pixels de large. Si ce n'est 
pas partait, c'est lisible. (M. N et W sur 
5 pixels). 

Puis sous TAG, J'affiche mon texte en 
incrémentant de 16 pixels à chaque 
lettre, triée au moyen de MIDS. 
Seules précautlortsd'usage : différen- 
cier zéro et sans quoi on se plante, 
avec affichage de «syntax error in 0» 
(difficile de rectifier cette ligne I). 
Ci-dessous, un exemple de résultat, 



I 



ENCORE PLUS FORT 



I Dans le n° de CPC on vous pro- 
pose de récupérer 9 K sur les disquet- 
tes SYSTEME. Mais Jean-Michel Thorol 
a mieux et en plus simple, 

• Comment gagner 13Ksurunedls- 
quetfe. Le procédé est simple : rega- 
gner les pistes 40 et 41 Inutilisées nor- 
malement. Pour ceci : 

- saisir dans vos mains délicates un pro- 
gramme permettant le formatage des 
pistes40et41 (DISCOLOGIE par exem- 
ple) en mode DATA. 

- une fols le formatage effectué, faire 
un CAT (à iogues bien sûr I). Place 
disponible: 178 K. 

Pa d'affolement I L'ordinateur n'est 
simplement pas au courant des mo- 
difications apportées sur la disquette. 
Pour ceci tapef le programme suivant : 

10 OPENOUT'd- 

20 POKE&A8A8.255 

30 POKE &A895. PEEK(&A895)+ 13 

40 CLOSEOUT : NEW 

- après un RUN (arrêtez de courir, 
tapez-le sur le clavier...), et un CAT. 
6 merveille I L'écran signale '191 K 
free'.CQFD... 



I 



FLASH 



Yannick Wattlau fait flasher son 
écran avec des CALL. 
Essayez CALL &BD20. Avez-vous vu le 
flash? 

Faites de môme pour &BD21 , &BD22, 
&BD23, &BD24, &BD25. 
Les couleurs changent. 

Maintenant tapez le programme : 

10 CLS 

20 CALL &BD20:CALL &BD21:CALL 

&BD22:CALL &BD23:CALL &BD24:CALL 

&BD25:GOTO 20 

RUN 

Génial non ? 

En ajoutant des paramètres derrière 

les adresses, la vitesse se modifie 

20 CALL&BD20, 1 etc.. 

Un autre truc 

Essayez out 255,0:out 256,0 

SI l'écran ne se remplit pas de traits 

bizarres, éteignez et recommencez. 







TIPS 




Un petit GOSUB à la ligne suivante 
permet de savoir (du moins sur un CPC 
464 et 664) le numéro de la dernière 
ligne de DATA utilisée, 
464 : 1000a = PEEK(&AE2F)'256 + 
P£EKC&A£2E):b=PEEK(A+l)-256+PEEK(A): 
PRINT b 

664 :1000 a = PEEK(&AE16)'256+ 
PEEK(SAE15):b=PEEK(A+l)'256+PEEK(A): 
PRINT'b 

Pour cacher la première ligne Basic : 
POKE 370,0 

La première ligne aura le numéro 
et ne sera pas llstable, sauf par DIS- 
COLOGY. 

Dans AMSTAR n° 34, page 99 (Au vo- 
leur), vous semblez perplexe face au 
Syntax error. Cela vient du fait que 
dans un REM les caractères supérieurs 
à 1 27 sont Interprétés comme des to- 
ken d'Instruction Basic. Or le token 221 
ne correspondant pas à une Instruc- 
tion sur le CPC 464, Il Indique une er- 



On pourrait aussi utiliser les caractè- 
res 222 à 226. 232 et 233. Facile de 
savoir ce qui se passe si on utilise 
CHRS(255). SI CHRS(221) ne marche 
pas sur un 6128, essayez un autre 
caractère ci-dessus. 



LISTING TRUQUE 



Nous avons reçu une foule de 
lettres (3) concernant le listing 
truqué. C'est pourquoi Je vais 
reprendre le contenu de ces missives 
car elles contiennent des éléments In- 
téressants. 

La première concerne le listing tru- 
qué numéro 1 , elle est envoyée par 
M. Jacques Bardou de Gaillac. Il nous 
précise plusieurs points qui sont exacts. 
En effet la variable MOD ne peut être 
utilisée comme telle puisqu'elle cor- 
respond à une Intructlon (qui donne 
le reste de la division entière de X par 
Y. On peut donc employer comme 
le suggère Jacques Bardou la varia- 
ble MO ou M. Restent ensuite deux 
problèmes : la boucle REPEAT UNTIL, 
qui peut alors être remplacée par une 
boucle WHILE/WEND comme vous 
pouvez le constater dans le listing sui- 
vant, qui lui est, normalement exempt 
d'erreurs. 

10 ' LISTING TRUQUE 



20 ' ************** 

30 rtODE 1 iK-0:rlEÎ10RY &4000- 1 
40 INPUT "Noi du fichier " 

j H on$ 

50 IHPUT "Mode graphique ";rl0 
60 L0CRTE 10,1 : PR IHT " Intro- 
duleez la DK ou la K7 et 
appuyer sur une touche" 
70 IF IHKEYJ-"' THEH 70 
80 MODE M0:'0n passe dans 
le aode graphique de la page 

90 LORD H0Î1$,&4000 

100 CRLL &BC06 ,£,40 

110 UH I LE K<500 

120 K- 1HKB.R0 (1 )*16000) 

130 P0KE &400Q+X,0 

MO K-K+l 

150 1IEHD 

160 CLS 

170 END 

Passons maintenant au listing du 
mois dernier. Vous vous souvenez cer- 
tainement du sujet : il s'agissait de trier 
une liste de chiffres en ordre croissant. 
Voici une des solutions possibles. 

10 ' LISTING TRUQUE No 2 

20 ' LE TRI QUI C0IHCE 

30 ' ENCORE UNE rtERUEILLE DE 

RUN INC 

40 CLS'Pour effacer tout 



50 Diri fit 12) 
60 NODE 2 
65 RESTORE 170 
70 FOR H-1 T0 12:RERD fl(n) : 
HEXT H 

75 FOR 1-1 T0 12 
80 FOR H-1 TO 12 
90 IF R(H-1)>fl(N) THEH K-R(H): 
fl(H)-fl(H-l):fl<H-1)-K 
100 HEXT H 
105 NEXT I 

1 10 PRINT «RFFICHRDE 0ES DON- 
NEES TRIEES» 
120 FOR H-1 TO 12 
130 IKK l,6:L0CRTE 1,H*1 "POUR 
AFFICHER LES CHIFFRES LES 
UHS EN DESSOUS DES AUTRES 
RUEC LR COULEUR R0U0E 
140 PRINT R(H) 
150 HEXT 
160 EHD 

1 70 OflTR 12,2,45 
160 DRTfl 7, 23, 56, 32, 3, 8, 
1 1 ,67,89 

Voilà le listing tel qu'il aurait pu être 
publié. Bien sûr. Il est loin d'être par- 
fait. Voyons un peu ligne par ligne les 
erreurs du listing du mois dernier. 

• Lignes 10 et 20: rien à signaler. 

• Ligne 30 : Il faut remplacer la virgule 
par une apostrophe. 

• ligne 40 : Il s'agit d'effacer l'écran 
et pas le programme NEW est donc 
remplacé par CLS. 

• Ligne 50 : Le DIM est dimenslonné 
pour 15 données, or en lisant les DATA 
on remarque qu'il n'y q que 12 don- 
nées. Il ne s'agit pas vraiment d'une 
faute car le programme fonctionne 
en laissant DIM A(15) mais cela oc- 
cupe plus de mémoire Inutilement. 



• Ugne 70 : Il n'y a pas 15 données 
mais 1 2, Il faut donc remplacer cette 
valeur dans la boucle sinon on obtient 
le message : « DATA EXHAUSTED». Le 
NEXT ne comporte pas ta bonne va- 
riable : c'est un «N» qui doit être écrit 
et non un «I». 

• Ugne 80 : Même remarque que pour 
la variable de boucle en 70. 

• Ugne 90 : Cette méthode de tri ne 
trie rien : elle efface plutôt des don- 
nées (essayez-la puis comparez avec 
le listing solution). 

• Ugne 100 : Le NEXT est correct. Il 
manque simplement une autre bou- 
cle de 1 à 12 pour trier toute la série 
de 12 DATA 



• Ugne 60 : Rien 

• Ugne55: Cette llgnen'estpas bien 
numérotée. Il est préférable de met- 
tre 65. Attention : si vous aviez tapé 
cette ligne telle quelle, elle se serait 
placée automatiquement entre 50 et 
60. De plus RESTAURE n'existe pas. Il 
faut le remplacer par RESTORE. Le 
numéro de ligne qui suit n'est pas le 
bon, les DATA commençant en 1 70. 



> Ugne 110: RAS 

• Ugne 120 : Même erreur qu'en 70 
et en 80. 

• Ugne 130 : Il y a bien 3 paramètres 
pour LOCATE mais seulement pour 
l'abscisse et l'ordonnée et le numéro 
de canal, en aucun cas pour la cou- 
leur de l'encre. D'ailleurs l'abscisse doit 
être constante si l'on veut que les 
chiffres s'affichent les uns en dessous. 
De plus ta couleur devra apparaître 
avec une Instruction INK comme dans 
le listing solution. 

• Ligne IdO : Tout bon. 

• Ugne 150: Idem 

• Ugne 160 : FIN n'existe pas dans le 
Basic Locomotive II faut mettre END. 

• Ugne 1 70 : Les DATA ne doivent pas 
être mis entre guillemets lorsque l'on 
doit les lire en tant que données numé- 
riques (READ A(n) de la ligne 70). De 
plus le point virgule n'est pas accep- 
té comme séparateur, on doit em- 
ployer la virgule. 

• Ugne 1 ÛO : Tout va bien. 

• Ugne 190 : Inutile, Il y a déjà un END 
en ligne 160. 




FANZINES 
CONNECTION 



Tiens pour une fois, 

comme je suis en forme 

et puisque Catherine 

n'est pas là pour me 

dissiper. Je vais en 

profiter pour vous 

régaler de ma prose, je 

sais, c'est beaucoup 

d'honneur mais que 

voulez-vous j'aime 

à partager mes lubies 

subites de délires 

calligraphiques. Bon, on 

est quand même dans 

la rubrique fanzine, 

alors il faut bien que 

j'en parle un peu. 



Commençons alors par ceux 
qui m'envole assez régulière- 
ment leur fanz' (bien vu les 
p'tlts gars). Je veux parler de Syntax 
Error. Evidemment, J'ai l'air malin de 
parler du numéro de Juin (number 4) 
mais je trouve qu'il est particulièrement 
bien fait , épais ettout et tout (même 
que II y a un listing à la fin qu'il est très 
bien). Bref rien queduboneten fran- 
çais monsieur I Alors abonnez-vous, 
sinon je déclenche une troisième guer- 
re mondiale. 



SSflffiX ERSCR 




Bon quand à Croco-mag. il veut 
encore de la pub car sa présentation 
a changée (Attention, je ne le ferais 
pas tous les jours) Je dis d'accord à 
une condition que Laurent me chro- 
noposte sa Out Run Graphie Démo. 



C'est d'accord? J'en profite pour lan- 
cer un appel à la population : si vous 
êtes un créateur de démos ef que 
vous voulez éblouir tous les autres en 
démontrant vos capacités en assem- 
bleur, envoyez-nous une disquette 
contenant vos exploits et vous aurez 
certainement l'honneur de figurer 
dans les pages rutilantes d'Amtar & 
CPC. SI vous ne voyez pas de quoi je 
veux parler, allez donc voir en fin de 
magazine vous y trouverez un exem- 
ple (superbe d'ailleurs) de ce que J'at- 
tends de vous. 



Je vous signale également un 
changement d'adresse qui concerne 
le Strad, Il faut maintenant envoyer 
votre courrier au: 

STRAD 71, rue de Franceville 93220 
GAGNY. 
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120 UT* »3,AF,21,M,00,22,68,4D,32 >ZD 
69,4D,01,7t,F«,e,t9,C3,FE,99,4F,D 
D.96A 

130 DATA 21,6D,A4,DD,7E,00,B9,28,QA >ZS 
,M>,23,DD,23,DO,23,DO,23,18,F0,DD,5 
6,993 

1U BATA 0i,DD,SE,02,DD,46,03,3E,19 >TB 
,93,88,38,07,78,90,3D,4F,C3,4£,A3,0 
E.7BE 

150 DATA 18,C5,FS,ES,D5,C1>,4E,A3,D1 >ZI 
,E1,F1,C1,5F,78,93,47,7C,63,67,1E,0 
l,BE4 
X160 DATA 14,1B,DA,3E,4C,32,49,A4,3E >TD 
,06,32, 4£,»4, 19, 10, «3,32, F6.A3, 78,3 
2,71» 
\ 170 DATA E1,«3,1E,23,41,C3,69,I3,58 >tC 
,7A,32,42,A4,32,4B,A4,22,97,A3,7B,3 
2,8F4 

190 DATA «,»», 78,32,4F, A4, 11, 45, M >IS 
,CD,I1,A3,3A,S4,A4,B7,20,F4,11,3F,A 
4.9AI 
.190 DATA CD,9B,A3 t ll,45,A4,CD,Bl,A3 >T9 
,11,48, 44,21, 00.C0, 19, 1E,CD,AC,A3,1 
1,967 
,200 DATA 43,A4,CD,B1,A3,21,64,A4,CS >TU 
, SE, 2S,F3,C9,01,39, A4, 18,08,01,21, A 
4,915 

210 DATA 21,64,A4,18,03,01,EA,A3,ED >TC 
~ e programme ,43,E3,A3,1A,47,C5,13,1A,01,7E,FB,F 
v«r s'adresse à ceux 5.94A 
qui possèdent le Jeu sur disquette et \220 DATA ED,78,S7,30,FB,FA,C9,A3,F1 >2K 
vous donne des vies Infinies : ,0C,E0, 79,06,08, 10,FE,Cl, 10,16,01, ? 

E,B32 
10 'VIES 1HFIHIE5 FOUB SILXW0RH DIS >U 230 DATA FB,11,00,00,C3,EA,A3,OC,ED >ZE 
gUETTE ,7S,0D,1B,ED,78,F2,EA,A3,7A,II3,C2,E 

20 H0DE 1:PB[KT'PATIE)(TEZ...' >ZU 5.BAD 

30 ADB=IA2B8:F0B A=90 T0 300 STEP 1 >FV 240 DATA A3,U,00,00,0C,ED,78,77,OD >TU 



0:D-0 

40 F0B B-0 T0 20:BE«D BI:C-«ALI't'> >HU 

BI):D=D*C:F0KE B*AM,C:IEIT 

50 IEAD BI:IF DOVALCftBt) THEH F >LL 

BIHT "EEBEUS EU LISE ■;A:E» 

60 ADa=AH*21:NFjTT >« 

70 PlIKtiFlIKT •IBSEBE L'ORICKM. XX 

de nuggn et tapez une touche.. .■ 

90 CHU. UBO0:CALL UB06:CALL U2BB >IK 

90 DATA OE,FF,21,C0,A2,CD,16,BD,AF, >T1| V 
47,48,05, FS,CD,32,BC, FI, Cl, 3C.FE, 10 
,BDF 



,23,18, 7A.B3.CA, 14,44, ED, 78,F2,03,A 
4,894 

250 DATA E6,20,C2,F7,A3,C3,1E,A4,0C >ffl 
,FJ>,76,I»,ED,78,F2,14 I A4,E6,20,C2,1 
0.B4C 

260 DATA A4,21,64,A4,ED,78,FE,C0,38 >2B 
,FA,OC,ED,78,77,OD,23,3E,05,3D,20,F 
0,907 
. 270 DATA ED,78,E6,10,20,E9,C9,ED,78 >TT 
,F2,39,A4,C9,03,OF,QO,00, 01, 08,02,4 
4,991 

280 DATA 00,09,00,00,00,00,00,00,00 >» 
,2A,FF,00,OD,09,13,05,OF,08,03,01,1 
8,196 



100 DATA 20,F4,CD,7A,A4,AF,a>,DE,BC >29 \290 DATA 14,00,06, 10,00, 1A,00,A4,00 «1 
,F3,01,7F,FA,ED,49,06,OB,21, 00,80,2 ,00,00,00,00,00,00,00,00,01,05,01,4 

B,9C2 0.138 

110 DATA 7D,B4,20,FB,10,F6,3E,02,21 )TH 300 DATA 02,07,11, 60,03,08,11, 40.E5 >T» 
,45,40,CD,OA,A3,3E,03,21,00,CO,CD,0 ,C5,CD,3B,BC,D1,OF,63,A4,C9,63,C7,0 

A.7AB 7,915 
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Plus d'angoisse due 
aux échecs I Avec 
ce programme prévu pour ceux qui 
possèdent Last Duel sur cassette, à 
vous les vies Infinies I : 



10 'VIES INFINIES P00H LAST DUEL M >LA 

SSETTE 

20 HEHOIT L3FFF:H0DE 1:L1GN=/0:0IA= >D0 

k9C41:G0SUB 50:1.1 GN'11D:D1B«UM0:G 

OSUB SOîPOKE 1i9FCC,UC 

30 PBIHT "HETT1E LA CASSETTE ORIGJN >HP 

ALE„.':F0S N=l TO 1000:SGT 

40 HODE liCALL U037:L0AD "Î'.UOOO >K2 

:H0DE 0:BORDES 0:F0l N=0 TO 15:READ 

A:IHK H,A:H£XT:FOfi H=l T0 2O0:HEIT 

:CALLUK» 

50 READ Al: IF *!=■■■ THffl fiETVBH >TG 
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60 BEAD S:C=0:F0B K»i TO 20 S7EP 2: >K 
B=VAL<*fc*fHin(At r N,2)):P0IŒ DIS.B: 
C=MB:DIB =DIH*liNEIT:lF COS THEH 
P81HT 'ESREUB A LA LIGNE ■LIGHîEHI 
ELSE LlOI=LIGN*10:G0T0 50 

70 DATA 80FF0000OEO0499CF4FF,1125 >AB 

60 DATA F4FFF4FFF4FF18ÛD0O5B, 1612 >AB 

90 DATA 000O2E9ED07000OO0O40,58B >TH 

100 DATA ■ >FB 

110 DATA F3DD21B39A2100C006C8 t 1261 >AU 

120 DATA DD750QDD23D074O0DD23, 118? >BU 

130 DATA 70060867300411500019,789 >ZX 

140 DATA 10EA31B39A3E1006F6ED.1199 >BU 

150 DATA 792632069C3E16CDFD9D,1070 >BZ 

160 DATA 30F53EC6B830F02520EF,1333 >BD 

170 DATA 06C9CD019E30E678FED4, 1435 >BV 

160 DATA 30F4CD019E30DC000021, 1178 >BQ 

190 DATA 5D9C110200ED5FO6122E,670 >AC 

200 DATA 017806D7CDFD90D20000,U67 >BC 

210 DATA 3EE7BBCB153E00003E15,846 )AV 

220 DATA D25C9D3A5C9C6532SC9C, 1196 >Blf 



230 DATA 653ACC9FAAABDDACDDAD, 1650 >CI 

240 DATA ADDD77000609Cfi63280D,683 >AG 

250 DATA 3ACC9FC611839232CC9F, 1326 >BN 

260 DATA 0505053ACC9FC67D32CC, 1013 >BT 

270 DATA 9FDD231B7AB3C2599DC3, 1376 >BH 

2B0 DATA BË9D11EB9DED53AA9D81,1532 >BB 

290 DATA 0601D17AB3C8DDE118SB,1342 >BA 

300 DATA 2A5D9C11DOFDED52C200, 1262 >BC 

310 DATA 0021D99D22AA9DDDE111, 1231 >BH 

320 DATA 50OOO601C3539DD17AB3J03S >AV 

330 DATA CAAC9DD5DDE113U5000,1306 >BM 

340 DATA D603C35SflDD17A83C8DD, 1381 >BJ 

350 DATA E121039F000000230603,464 )ZU 

360 DATA C3599DCD119ED0C3049E, 1386 >BX 

370 DATA 7BE6O7CA0A9£3E00C3Of,lO02 >8E 

380 DATA 9E3E133D20FDA704C83E, 1016 >BG 

390 DATA F5DBFF1FC8A9E6402BF3, 1696 >B1 

400 DATA 792F4F3E0OO0O0C32C9E, 706 >AC 

410 DATA 37C97C215B9C8623BEC2,1213 >BP 

420 DATA 0000AF327F14324F2332.586 >ZI 

430 DATA 9623000000AF06F6ED79,972 >ZH 

440 DATA 018C7FD9E131F8BFE5CD,1632 >BC 

450 DATA 09B9CD03B8F3C9FB060A, 1296 >BJ 

460 DATA i >a 

470 DATA 0,20,14,1,3,6,15,16,24,25, >HU 
2,11,18,4,9,26 



ELIMINATOR 



Dans notre numéro 
du mois d'août, 
vous ave2 pu découvrir Elimlnaror et 
nous supposons que, depuis, vous êtes 
nombreux à avoir usé vos nerfs des- 
sus. Dans le banc d'essai, nous vous 
donnions quelques codes d'accès 
pour parvenir directement au niveau 
souhaité. Ce mois-ci, bande de pe- 
tits vernis, nous vous les donnons 
tous !!! Surtout, souvenez-vous bien 
qu'ils sont compatibles avec un cla- 
vier QWERTY, les possesseurs de cla- 
vier A2ERTY doivent donc faire la cor- 
respondance des touches. 
Niveau 2 : BLOSP 
Niveau 3 : ASDEL 

XPLRT 

GLPWM 

EOCKQ 

LFPRT 

WMCPR 



Niveau 4 
Niveau 5 
Niveau 6 
Niveau 7 
Niveau 8 

Niveau 10:ZPEML 
Niveau 1 1 : ELVPQ 
Niveau 12 : CPEMF 
Niveau 13:APXYQ 
Niveau 14 : PWVA& 

On entre chaque code lorsque la 
page de présentation est à l'écran. 



V 



STORMLORD 



Après avoir chargé 
et lancé ce pro- 
gramme avec le Stormlord en dis- 
quette, vous aurez droit à des vies in- 
finies, au passage à travers les enne- 
mis et à une rallonge de temps : 



10 ' IHHORTALITE, INVINCIBILITE, BAL >LA 
LGttGE DE TBffS POUB STOBHLORD D1SQU 
ETTE 

20 FOR A=0 TO 174:READ At:B=VAL(*fc' >LI 
*At):PÛKE A+lA500,B:C=C+B:NEn 
30 IF CO 19504 THEN PRIHT 'EBREUBS >DV 
DANS LES DATAS.. .VEND 
40 HODE 2:PB1HT 'INSEREZ L'OBIGINAL >NI 
DE STÛRHLOBD ET APPUYEZ SUR UNE TO 
UCHE...' 
50 CALL MBOOîCALL fcBB06:CALL US74 >BU 



60 DATA 21,FF,AB,n.40,00,CD,CB,BC, >WX 

0E,07,CD,0F, 89,05,00,00,69,11,00, 08 

,CD 
-70 DATA 63,07,01, 7E,FB,3E,4C,CD,5C, >IR 

C9,3E,00,CD,5C,C9,3E,08,CD,5C,C9,3E 

,00 

00 DATA CD,5C,C9,3E,23,CD,5C,C9,3E, >IG 

06, CD, 50. 09, 3E.23, CD.5C, 09, 3E, 01, CD 

,50 

00 DATA C9,F3,3E,FF,CD,5C,C9,21,00, >ÏD 

OA,CD,E5,C6,FB,CD,10,C9,3A,14,A5,FE 

,0D 

100 DATA 28, 12,30, 32,14,A5,32,26,A5 >«H 

,3A,4B,A5,C6, 18,32,48, A5,C3,12,A5,C 

1,CD 

110 DATA OF,B9,CD,03,Bâ,C9,CD,00,A5 >Ifi 

,AF,CD I 0E,BC,3E,07,32,14,A5,32,26,A 

5,32 
, 120 DATA 57,A5,3E,C0,32,4B,A5,CD,OO >«. 

, AS, 21, 00,00,11, 00,02,01. 00,08,£D,B 

0,3E 
. 130 DATA 09,32,81, 6B,3E,40,32,6*,6E >TL 

,32, 24, 73,F3, 01, 7E,FA,ED, 79,03,98,1 



HOLOCAUSTE 




Pour tous ceux qui 
ont attrapé quel- 
ques cheveux blancs devant ce jeu 
d'aventure et qui n'ont toujours pas 
réussi à se retrouver dans les rues de 
la ville baignant dans une radioacti- 
vité fort peu agréable, voici le bon 
chemin à suivre pour se retrouver de- 
hors. Quant à la suite de l'aventure, 
ce sera pour plus tard . 



O - OUVRE ARMOIRE - EXAMINE AR- 
MOIRE - PRENDS LUNETTES - PRENDS 
COMBINAISON - ENFILE COMBINAISON - 
N - OUVRE PLACARD - EXAMINE PLA- 
CARD -PRENDS PIED-DE-BICHE - 
SUD -SUD -REGARDE SOUS LIT - 
PRENDS AIMANTS - ALLUME ORDINA- 
TEUR - ETEINDS ORDINATEUR - N -TIRE 
ARMOIRE - EXAMINE GRILLE - RETIRE 
GRILLE- METSLUNETTES-O- MON- 
TE - POUSSE GRILLE - N - E. 

Un conseil : n'oublie2 pas de rempla- 
cer les plies de vos lunettes. 



Si vous r. 
logiciel sur cassette, 
rentrez tout de suite ce programme, 
invisibilité et immortalité garanties ; 

10 'VIES INFINIES ET INIMITE POUB >LA 
H.A.T.E. CASSETTE 

20 HODE l:C=O:F0B A=lBF00 TD IBF3C: >Bfl 
BEAD AI:B=ilALCV*AI):POICE A,B:C=C* 

30 IF C0618B THEN PBINT 'EKBEUBS D Kl 

ANS LES DATAS.. .<:EW) 

40 POKE IBF2S,U7:P0KE fcBF2A,k3E:P0 >TT 

KE ltBF2F,4:P0IC£ tBF30,0:P0KE 6BF35, 

fcl8:P0KE UF36.&29 

50 niHTiPBIH «HETTSE LA CASSETTE >VZ 

0BIG1NALE... I :F0B tel TO 1GOO:HEIT 

60 KHOBT L7FFF:CAU l>BD37:HQK liL >CE 

QAD V,MO0O:CALL UF00 

70 DATA F3,21,lB,80,n, 0,80,1, 6F, 1, >PE 

7D,ED,4F,ED,5F,AE,EB,AE,EB,77,23,13 

,B,7B,B1,20,F2,21,24,BF,22,6E,B0,C3 

,2C,B0 P 3E,3D t 32,D2,54,3E,3A,32,l,$7 

, 21, BB,6F,22, 2,57,21, A7.28,22,E3,64 

,C3,C6,53 



BANC D'ESSAI MATERIEL 

CARTE 
FO-DOS 




Qui n'a pas révô de posséder 
deux ordinateurs en un. Jus- 
qu'à présent les possesseurs de 464 
étalent bien à plaindre : certains lo- 
giciels tournaient uniquement sur 61 28. 
d'autres nécessitaient une extension 
mémoire. Il faisait bon posséder les 
nouvelles versions de CPC. Enfin vol- 
ci que le rêve devient réalité : avec 
la carte FO-DOS une extension 64 Ko 
et un lecteur de disquettes, les 464 se 
métamorphosent en 6128 excepté 
pour le «look- extérieur. Tout cela 
grâce à un morceau de circuit Impri- 
mé supportant une ROM, une diode 



et un Interrupteur. L'Installation de la 
carte est très simple : il suffit de la pla- 
cer sur le connecteur du lecteur de 
disque puis d'installer les 64 Ko (facul- 
tatifs) et enfin le lecteur de disquet- 
tes. Evidemment cela fait un peu usine 
à gaz, surtout si l'on ajoute encore un 
Mirage Imager ou un Hacker, mais 
qu'Importe, il suffit de changer la 
position de l'interrupteur pour que l'on 
se retrouve avec un 464 ou un 6128, 
Si les programmes utilisés ne font pas 
appel au Bankmanager. alors l'exten- 
sion 64 Ko n'est pas obligatoire. Les 



listings publiés dans la revue Amstar 
& CPC (par exemple I) fonctionneront 
donc sans aucun problème. 

Vous pouvez vous procurer carte 
FO-DOS et extension mémoire auprès 
de Duchet Computers avec manuels 
en françaiss'il vous plaît I 

Tiens pendant que nous sommes 
dans les produits Duchet, la version 
nouvelle du Hacker est arrivée. Il suf- 
fit de changer une petite ROM et le 
tour est joué : la version 7.0 nous ap- 
porte un assembleur en supplément. 
Alors à vous les bidouilles en langage 




A quelques jours de la rentrée, vu 
votre tête encore perdue sur la plage, 
il serait prévenant de ma part de vous 
remettre dans le bain... (Bain...! = mer, 
soleil = vacances... Euh, c'était comment 
lesvacances?) Alors, il paraît que c'est 
pour cette année le brevet ? (Ah, qu'esta 
ce qu'elle est vache celle-là !}. Je parie 
que vôtre estomac n'est déjà plus qu'une 
corde à nœuds... Du calme ! , keep cool, 
et sache que l'on peut très bien se pré- 
parer tout en pianotant agréablement. 
Vise un peu ce que te propose Micro 
Brevet... 

Il possède en effet une gamme de 5 lo- 
giciels orientés vers les révisions du 
brevet. Nous avons testé Français, Géo- 
graphie et Mathématiques, qui tous les 
3 bénéficient de la même présentation, 



correcte, même si tout à fait classique 
et un peu sévère (quoique arrivées en 
troisième nos chères têtes blondes n'aient 
plus besoin de zolis dessins...). En pre- 
mière page, un menu à sélectionner qui 
est en fait le programme de l'année, puis 
succession d'exercices sur les points que 
vous avez choisis. En option : des rap- 
pels de cours succincts, disponibles à 
tout moment. 

A chaque fois, on vous laisse une chance, 
la correction n'étant donnée qu'au bout 
de 2 échecs. 

A souligner : une option qui permet de 
quitter le programme à tout instant. A 
la fin de la série d'exercices, un bilan 
est dressé et le but est d'obtenir une note 
supérieure à 12/20 avec une possibili- 
té de rattrapage par des exercices sup- 



plémentaires si la note est comprise entre 
8 et 12. En Maths et en Français, si la 
note est inférieure à 8, dés rappels de 
cours sont automatiquement imposés. 
A noter : une protection agaçante avec 
le système des grilles colorées. 
En bref : il faut mettre en évidence. qu'il 
s'agit surtout de logiciels d'exercices, qui 
ne sont doncpas destinés à faire le cours 
maisàvoir si ce quiàété appris en classé 





ALGEBRE 



L'intérêt réside dans le caractère progressif de la suite d'exer- 
cices proposés à l'élève. Les rappels de cours sont aussi un 
peu trop brefs mais apportent il est vrai un esprit de synthèse. 
L'originalité ici est une présentation nouvelle : il existe en plus 
une option exemples, une touche donnant une caîculette> 
une autre un carnet de notes où l'on peut écrire librement, et 
une dernière pour le tableau de brouillon qui permet de po- 
ser des opérations comme de tracer des schémas. 

• Un programma complet, une présentation Intelligente. 



Le menu vous propose trois thèmes : l'orthographe, ta gram- 
maire et la rédaction. A vous de sélectionner ensuite les points 
précis d'un de ces 3 domaines qui vous posent des problè- 
mes. Prenons par exemple l'orthographe qui se compose du 
pluriel et féminin, verbe, participe présent, participe passé, 
homophonîes. On testera la qualité de votre orthographe par 
des exercices de difficulté croissante où vous aurez dans des 
phrases des mots à compléter ou à sélectionner . 
En grammaire les exercices alternent entre la nature et la fonc- 
tion . Quant à la partie rédaction, il y a le choix entre 2 devoirs 
de réflexion et 2 d'imagination avec par exemple des suites 
de textes . Il s'agit en fait de tester vos possibilités de compré- 
hension et votre aptitude à mener des raisonnements logiques 
car des questions vous sont posées sur un texte ou sur un su- 
jet et vous devez sélectionner les réponses proposées. II ne 
s'agit donc pas réellement de rédaction . 

• Un bon outil de travail en complément des cours pour l'or- 
thographe et la grammaire mais dommage qu'il n'y ait pas de 
création pour la partie rédaction . 



GEOGRAPHIE 



à encore, le logiciel est basé sur des exercices. Trois sujets 
traités ; l'URSS, les USA, la France qui sont les 3 grandes puis- 
sances au programme ; pour chacun d'entre eux différents 
aspects sont abordés comme l'économie, l'agriculture, l'espace. 



Les exercices évaluent vos connaissances par des localisations 
et des repérages sur carte, des interprétations de légendes, de 
graphiques, de tableaux. Si vous avez un problème de mé- 
moire, vous disposez de rappels de cours succincts et d' an- 
nexes fournissant des documents complémentaires. Une op- 
tion à objectif pédagogique existe aussi et vous donne tous 
lés rappels méthodologiques nécessaires. 

• Un logiciel utile, on aurait toutefois aimé un peu plus de cours 
et de belles cartes. . 



Edité par : Nathan logicklsICoktèl vision 
Prix indicatif ; DK, 209 F 



Ces trois logiciels tout à fait intéressants pour une bonne 
préparation à l'examen grâce à la richesse et à la variété 
des exercices. Toutefois, des cours plus développés n'au- 
raient pas été superflus. 
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Ben est un policier victime 
d'une machination : on l'accuse 
d'avoir massacré des centaines 
d'innocents alors qu'au contraire 
il a essayé de les sauver. Bref Ben 
Richard est devenu un paria de la 
société. Après maintes péripéties 
(une évasion entre autres) notre 
héros se retrouve la vedette d'un 
jeu télévisé très célèbre : Running 
Man. La règle du jeu est assez 
simple il suffit de survivre le plus 
longtemps possible aux attaques 
d'êtres sans pitié : les traqueurs. Ces 
hommes sont surentraînés et tous 
munis d'armes différentes. Ben va 
en «user» plusieurs car ii est plu- 
tôt violent avec les pauvres tra- 
queurs. C'est une grande compa- 
gnie 1CS, qui produit ce jeu télévi- 
sé et Damon Killian, l'animateur, 
est prêt à tout pour donner du spec- 
tacle à son public. Et du spectacle 
il va en avoir car le Ben a promis 
qu'il reviendrait et il tient toujours 
ses promesses, le bougre. Le pre- 
mier adversaire de l'ex-policier est 
Subzero, un hockeyeur à la crosse 
munie de lames de rasoir et qui 
lance des palets meurtriers sur ses 
adversaires. Pour le rejoindre, Ben 
doit tout d'abord escalader quel- 



ques obstacles, puis il entre dans 
l'arène. En plus de Subzero il va 
trouverun chien féroce qui lui saute 
à la gorge dès qu'il l'aperçoit. 
Heureusement ce premier adver- 
saire est assez facile à vaincre : il 
suffit de sauter pour éviter les pa- 
lets et de donner des coups de pied 
à chaque fois que le traqueur passe 
devant Ben. Bientôt le niveau 
d'énergie de Subzero passe la barre 
du zéro et c'est une mort en bonne 
et due forme. 11 ne reste plus à notre 
policier qu'à rejoindre le bout de 
la patinoire pour passer à l'étape 
suivante un jeu de logique, où faut 
reconstituer à partir d'un modèle 
un motif de symboles géométriques 
et fout cela en quelques secondes. 

Si cette épreuve est une réussite, 
le niveau d'énergie de Ben est aug- 
menté. II aura besoin de cette éner- 
gie supplémentaire pour affronter 
ses adversaires ultérieurs. Non ce 
n'est pas le suivant Buzzsaw et sa 
tronçonneuse qui sont dangereux 
mais bien Dynamo qui se trouve 
au troisième niveau. II y a encore 
deux autres niveaux qui vont per- 
mettre de terminer le jeu si Ben en 
a la force. 





Edité par :Grandslam 
Prix indicatif: K7, 95 F 
DK, 145 F 



The Running Man est tiré d'un film américain 
(bien plus distrayant que le film le Prix du dan- 
ger dont il s'inspire). Le logiciel n'apporte fran- 
chement pas grand-chose à l'équilibre cosmi- 
que et ii est relativement moyen. On peut faire 
mieux sur l'Amstrad au niveau réalisation et au 
niveau du scénario. 

OOOO jafto 




Ta ta taaa, ta ta taaa (musique de J. Williams) tout 
ce vacarme pour vous annoncer le retour d'un des 
plus célèbres héros d'aventure deces dernières années 
Indiana Jones. La dernière croisade c'est le titre de i 
troisième histoire mettant en scène l'homme au cha- 
peau et au fouet. Ceci est la partie arcade de cette saga 
puisque vous le savez déjà il y a deux versions du jeu. 
La seconde arrivera plus tard et sera entièrement ré- 
servée aux aventuriers. Dans cet épisode, Hitler veut 
mettre la main sur le Graal car il est dit que quiconque 
boira le contenu de cette coupe régnera sur le monde 
pendant mille ans. Et comme par hasard le père d'In- 
diana Jones est le spécialiste mondial du Graal. 11 est 
donc enlevé par les nazis et son «junior» doit aller le 
délivrer. Pour l'instant, le pauvre Indy est à l'intérieur 
d'une série de galeries avec pour mission de récupé- 
rer une croix. Pas n'importe quelle croix mais celle de 
Coronado. Vous ne la connaissez pas ? Moi non plus 
mais elle est certainement très impor- 
tante puisque vous devrez pas- 
ser de nombreux obstacles 
^^^^^^^ avant de pouvoir la tenir 

entre vos mains. 
Vous disposez au départ d' 




torche et de vos poings. Par la suite vous trouverez 5 

fouets qui seront fort utiles pour vous débarrasser de certains adversaires. Car les 

pilleurs de tombes qui ont dérobé la croix sont toujours dans les parages et sont 

armés de revolvers ou de couteaux meurtriers. Les pièges abondent tels les 

morceaux de stalagtites se détachant du plafond et venant s'écraser à 

vos pieds si vous avez de la chance et sur votre tête en cas de 

réflexes défectueux. Sinon ce sont les obstacles habituels : 

rivière souterraine à traverser suspendu à des cordes, 

plates-formes qui se pulvérisent sous vos pas, 

à escalader. 

Vous allez certainement remarquer au 

cours du jeu que l'écran change de 

couleur ; c'est l'astuce utilisée 

pour symboliser l'extinction 

progressive de votre torche : 

il va falloir en trouver une de 

rechange rapidement sinon 

vous allez vous retrouver dans 








t utti 



T?oinr 




le noir et cela fera une vie de moins. Chaque niveau (il y en a 
trois) est divisé en deux phases. Apres avoir récupéré la croix il 
faudra se battre sur le toit d'un train en marche, ensuite on fait 
un petit tour à Venise pour y admirer les catacombes ce qui en- 
traîne logiquement vers la forteresse où est enfermé le père de 
Jones. Passons au troisième niveau qui nous mène d'un dirigea- 
ble bourré de nazis au temple du Graal recelant la cause de tout 
ce remue-ménage : le Saint-Graal. 

Edité par rLucasfilm Games. 
Prix indicatif :Non communiqué 



Finalement malgré son graphisme pauvre en couleurs et son 
animation pas vraiment rapide Indiana Jones version arcade 
est plutôt agréable à jouer. La musique de présentation est 
très bonne. Je pense que la version aventure devrait être tout 



de même supérieure. 

OOOO i.%120 






Il II 







BUTCHER 
HILL 

^S31 



^ Tiens revoilà le Vietnam avec une 
joyeuse aventure au titre exhalant la 
bonne humeur : la colline du boucher. 
Hardi les gars, tirons sur le Viët ça ne peut 
pas faire de mal. Le but de la mission n'est 
pas très Important finalement pourvu que 
l'on s'amuse. Pour une fois on ne com- 
mence pas dans la jungle profonde mais 
sur un canot pneumatique au fil d'une 
rivière inconnue. A. la surface de cette 
dernière peu de choses sinon des plan^ 
tes aquatiques qui paralysent momenta- 
nément votre embarcation et quelques ro- 
chers servant de tremplins. Votre but : 
atteindre l'un des trois pontons sur le côté 
de la rivière tout en sachant qu'il faut avoir 
un minimum de matériel pour pouvoir 
continuer. De temps à autre le ciel r«,-uit 
la visite d'un ou plusieurs appareils vo- 
lants pluscommunément appelés avions. 
Il y en a de deux types : les alliés et les 
ennemis. Les alliés vous larguent des sacs 
contenant des munitions, du matériel ( 
la boussole par exemple) et de l'énergie. 
Les appareils ennemis larguent aussi mais 
il donnent plutôt dans le violent avec leurs 
balles de mitrailleuse. Les petites boules 
jaunes avec des antennes ne sont pas des 
Pac-man mais des mines très dangereu- 
ses. Sinon dès l'apparition du ponton, il 
s'agit de faire feu dessus pour passer à 







la section suivante : la jungle. Il faut ici 
retrouver le village du pied de la colline 
dont il est question dans le titre déjà cité 
plus haut. Muni de la boussole (si vous 
l'avez récupérée bien sûr), il suffit de 
suivre les indications de cet appareil 
merveilleux en sachant que votre but se 
>e au nord-est (admirez la précision). 
On parle souvent de renchevêtremen t des 
arbres dans la jungle mais là vous allez 
comprendre votre douleur : des troncs 
apparaissent brusquement sur un chemin 
auparavant dégagé. Sans parler des en- 
nemis qui surgissent sans crier gare et je 
:ie vous parle pas des mines je ne les ai 
pas vues. Ce n'est pas fini, il reste encore 
une troisième partie : c'est l'arrivée au vil- 
lage bourré d'ennemis dont vous devrez 
vous débarrasser à coups déballes et de 



Edité par : Gremlin 

Prix indicatif :K7 ,99F; DK, 149F. 



Dans la grands lignée des jeux de 
guerre, Butcher Hill ne se démarque 
pas beaucoup de Piatoon par exem- 
ple. Alors pourquoi nous imposer ce 
logiciel qui n'est pas très beau de sur- 
croît. Butcher Hill ne devrait donc 
passionner que ceux qui ne sont pas 
encore saturés de pseudo-reconstitu- 
tions du Vietnam. 

OOOO dilso 



Tak 



ANKATTACK 



^ Autant vous prévenir tout de suite, Tankattack est un 
^ logiciel spécial : la disquette en elle-même est inutile 
sans le plateau de jeu présent dans la boîte. 
En effet, ce wargame est plutôt un jeu assisté par ordina- 
teur, le CPC se chargeant de compter les points et de gé- 
rer différents aspects du jeu. 
L'histoire se déroule sur un continent inconnu. Ce conti- 
nent est partagé en quatre pays : Calderon, Sarapan, Kà- 
zaldis et Armania. Tous ces pays sont très près les uns des 
autres comme vous pouvez le constater sur le superbe pla- 
teau de jeu cartonne 40x40 cm que vous trouverez en ca- 
deau dans le boîtier joli. 

Cette proximité entraîne certaines animosités qui poussent 
lesdits pays à se castagner en permanence. 
Tout de même, il y a des alliances qui se sont conclues (on 
est toujours plus performants à deux) dans l'intérêt de cha- 
cun des protagonistes. Ainsi Calderon s'est acoquiné avec 
Sarapan tandis qu' Armania fricote avec Kazaldis. 
Donc vous choisissez les pays belligérants en tenant comp- 
te des alliances. Chacun dispose de plusieurs unités de 
combat, divisées en deux catégories : les blindés et les tanks. 
Dans chaque catégorie il y a différentes puissances de feu 
matérialisées par de petites marques en plastique à l'ar- 
rière des figurines {ah, j'ai oublié de vous dire qu'il y avait 
également des petits tanks livrés avec le logiciel}. 
Le mode d'emploi vous décrit les différentes zones de la 
carte en vous expliquant leur importance. 
Sur ce terrain parsemé de petits hexagones {comme tout 
bon wargame qui se respecte) on distingue des zones dé- 
militarisées, 4 Q.G., 4 zones de réparation et 2 zones de 
reconstruction. 

Une journée typique de guerre se déroule en plusieurs pha- 
ses : l'ordinateur vous indique (si vous avez choisi l'icône 
mouvement) de combien de points de déplacement vous 
disposez en fonction du temps (météo) et du moral des 
troupes. 




Ensuite il est possible de passer à la phase attaque des chars 
ou du Q.G. ennemis. Dans le cas d'une offensive entre blin- 
dés, il faut indiquer à l'ordinateur les forces en présence 
et la distance qui sépare les unités. 

Une petite scène animée va représenter le combat dans 
toute son intensité ensuite viendra le résultat des courses 
avec la possibilité d'envoyer les véhicules abîmés en ré- 
paration. Si vous êtes assez proche d'un Q.G., il est possi- 
ble de l'attaquer et ainsi de porter un coup décisif à l'ad- 
versaire. 

Lorsque mouvements et attaques sont terminés, on peut 
alors passer sans Tegret au pays suivant qui va procéder 
de même. A la fin de la journée, une édition spéciale du 
journal War News est affichée à l'écran. 
Les informations contenues doivent être prises avec mé- 
fiance ( à cause de la propagande) mis à part le bulletin 
météo toujours juste et très important pour la stratégie. 

Edité par : CDS - Prix indicatif : Non communiqué 



Tankattack est un produit original qui n'intéressera pas 
les amateurs d'arcade. En revanche, ceux qui dési- 
rent s'initier aux wargames «sur table» trouveront avec 
ce programme la possibilité de commencer sans mal 
une bataille et d'affûter tactique et stratégie car 
l'ordinateur s'occupe de tous les aspects con- 
traignants des wargames : gestion des 
combats, des réparations etc. 




Le- calcul mental n'est pas seulement 
une forme raffinée de torture pour 
enfants c'est surtout un procédé qui dé- 
veloppe la capacité de manier rapidement 
des données. Dans certains pays comme 
le Japon l'enseignement de ces méthodi» 
est poussé au plus haut point. Sans aller 
jusqu'à ces extrêmes, il est possible de se 
sentir à l'aise avec les chiffres. Le lugi- 
ciel «calcul rapide» est destiné aux éco- 
liers du primaire. Il y a quatre program- 
mes abordés : les tables, les décimaux, les 
sexagésimaux et le calcul mental propre- 
ment dit. 

Chaque programme est divisé en deux 
grandes parties : l'entraînement et le test. 
Pour les tables, il s'agit de choisir entre 
l'addition et la multiplication puis de sé- 
lectionner la table entre 1 et 9. Dans le 
mode entraînement, l'élève dispose- d'un 
temps de base pour répondre à tous les 
calculs. En revanche dans le mode test, 
chaque réponse doit se faire en un temps 
déterminé par le niveau qui change lors- 
que l'élève à répondu à toutes les ques- 
tions. La moindre erreur oblige à repas- 
ser par le même niveau. Pour le program- 
me nombres décimaux, on vous propose 
3 intervalles de chiffres pour la partie en- 
tière et jusqu'à 4 chiffres après la virgule 
pour la partie décimale. Le principe de 
l'interrogation est le même que pour les 
tables en ce qui concerne le temps mais 
il s'agit ici de placer un signe «plus grand 
que» ou «plus petit que» entre deux nom- 
bres décimaux proches. 
La partie nombres sexagésimaux place 
l'élève devant des calculs horaires avec . 
des conversions (minutes/secondes et se- : 
condes/minutes), des additions et des 
soustractions. Bref toutes sortes de cho- 
ses utiles quotidiennement. 
Enfin le calcul mental propose les 4 opé- 
rations avec des nombres aléatoires au 
cours de 3 niveaux de difficulté. 
Les autres options du menu concernent 
la modification des comptes à rebours 
pendant chacune des épreuves ou encore 
un relevé de notes, l'élève entrant son nom 




à chaque fois qu'il commence un test. Le 
relevé peut être également sorti sur im- 
primante. La dernière option «documen- 
tation», permet de consulter les différen- 
tes caractéristiques de chaque programme. 

Edité par :Micro-C 
Prix indicatif :DK, 200 F 



Ce programme simple d'emploi est tout 
à fait adapté au but qu'il s'est fixé : 
l'acquisition d'un «réflexe» de calcul. 
Seul petit regret : ia présentation est 
un peu austère. 
A/*AA /filin 




Multicours est une série d'éducatifs destinée aux col- 
légiens de la sixième à la troisième. 
Ils abordent tous trois matières : la Géographie, les Scien- 
ces Naturelles, le Français. Ils sont avant tout destinés à 
compléter par des exercices les leçons vues en classe en 
vérifiant si celles-ci ont été assimilées. Ces logiciels ne pré- 
tendent donc en aucun cas remplacer les professeurs. Un 
jeu d'arcade à été intégré au logiciel et la détente côtoie 
donc le travail. Dans certains exercices,vous devez recom- 
mencer jusqu'à ce que vous donniez la bonne réponse ce 
qui est fatigant si vous l'ignorez et vous avez la possibilité 
de sélectionner des effets sonores .On vous donne une 
option aide mais par contre il n'y en a pas pour quitter le 
jeu .Une note globale vous sera attribuée qui tient compte 
bien sûr de vos hésitations. 



■Éii 





La présentation diffère suivant le niveau des classes. On en 
distingue deux types : pour la sixième et la cinquième, on a 
associé l'aspect ludique en montant un scénario où l'élève est 
élevé au rang de personnage principal. Pour les deux classes 
suivantes, on passe directement au sujet. 
On regrettera pour toutes les sections des cartes tout à fait 
quelconques, aux couleurs peu attrayantes et des illustrations 
moyennes. Par contre, lé programme semble complet et bien 
spécifique à chaque section. 

En sixième, vous devez vous mettre dans la peau d'un repor- 
ter qui prépare un sujet sur les milieux naturels ; vousétudie- 
rez donc Se monde entier. On évaluera d'abord vos connais- 
sances générales en vous demandant de placer par exemple 
correctement sur un dessin les tropiques. Ensuite, il faudra 
que vous étudiiez les milieux pour décider de votre îtiné- 
raire,puis les climats, la faune et la végétation. Enfin, vous 
serez confronté à un jeu de synthèse. 

En cinquième, grand homme d'affaires, vous voulez vous im- 
planter à l'étranger. On va d'abord vous présenter l'Afrique 
et l'Amérique latine après quoi ce sera à vous de les étudier 
en répondant à de multiples questions. Par exemple en Afri- 
que, après l'histoire coloniale, étude des climats et végétation 
des différents pays puis au Tchad, analyse économique. 
Pour la quatrième et la troisième, on' passe directement aux 
choses sérieuses. En quatrième, vous êtes plongé dans la réa- ■ 
lité de l'Europe et devrez localiser les Etats, puis étude de l'as- 
pect institutionnel, militaire, de l'agriculture, de l'industrie. En 
troisième, on abordé une seule des puissances mondiales au 
programme, ia France, ce qui est insuffisant. Vous aurez prin- 
cipalement des cartes à compléter.Pour ces deux classes,une 
note d'évaluation est donnée à la fin de chaque épisode. 



• Malgré des cartes très moyennes, on ne peut que 

la richesse des informations (sauf en troisième), l'idée de 

nario pour les deux premières classes est bonne et bien 



tater 



FRANÇAIS 



C'bkld nous ménage ici une surprise de taille : 
que l'on étudie la même chose de la sixième à la 
vois d'ici les professeurs faire de grands bonds en se tenant la 
têie entre les mains. Fh oui, car dans Multicours, vous aurez 
beau chercher en y mettant toute votre bonne volonté la con- 
clusion s'impose et retentit lourdement ; de la sixième à la 
troisième, la partie Français est rigoureusement la même. Alors 
on ne voit pas pourquoi on s'étendrait sur cette matière... 
Sachez tout de même que l'histoire de Don Quichotte défile 
en quatre pages devant vous. Après quoi.des questions élé- 
mentaires vous sont posées pour évaluer votre compréhen- 
sion du texte. 
Un dictionnaire vous explique les mots les plus difficiles. 



• A la pointure d'u 



mais d'un troisième- 



Dans cette discipline,on a adopté la présentation qui est la sui- 
vante : un texte d'introduction sur un domaine quelconque, 
des exercices; puis des documents complémentaires intégrés 
ou non- aux réponses. Souvent, il y a des animations très inté- 
ressantes mais dommage qu'elles ne soient pas à la hauteur 
graphiquement. Les connaissances abordées ne sont pas très 
homogènes, on traite les choses les plus faciles comme les plus 
difficiles. On note la possibilité de choisir soi-même les chapi- 
tres que l'on veut étudier. 

En sixième et en cinquième, ô divine surprise, c'est la même 
chose...! Vous aurez droit à «l'étude des lois fondamentales 
de la vie animale et végétale» avec l'étude de tout ce que l'on 
peut trouver dans une ferme, une forêt, un jardin. 
Dans les deux classes suivantes, vous verrez successivement 
la nature des roches et leur formation, puis en troisième la 
biologie humaine avec découverte et transmission de la vie 
qui précèdent l'agression par le milieu... 

• Dommage cette constatation pour les deux premières clas- 
ses, car malgré la médiocrité des illustrations et des anima- 
tions, c'est très riche et bien fait pour la troisième. 

Édité par :Coktei vision 
Prix indicatif : DK, 235 F 



Cette série, bien que riche d'informations, présente cepen- 
dant des inconvénients majeurs : désagréable impression 
e répétition, réalisation pas très soignée... 



Où jolSo 




Nous vous présentons chaque mois quelques 
logiciels qui ont tous un point commun : leur 
prix... 

En effet, ce sont des programmes sur cas- 
settes, qui valent "15 balles" en Angleterre^ 
et vouspourrez vous les procurer pour la mo- 
dique somme de 31 francs, port compris, en 
vous adressant chez DUCHET COMPU- 
TERS dont voici les coordonnées : 
51 St George Road 
CHEPSTOW 
NP6 5LA 
ANGLETERRE 
Tél. 
(44)291.625.780 



Enduro racer 



MlG29 




Vous êtes le pilote d'un Mig 29 et vous survolez un territoire ap- 
paremment hostile. En effet de multiples obus et autres missiles 
tentent d'abattre l'engin volant. Heureusement vous avez à votre dis- 
position une batterie d'armes toutes plus meurtrières les unes que 
les autres. Des parachutes surgissent parfois des deux et transpor- 
tent des caisses de munitions ou des bidons de fuel, suffit de voler 
dessus pour récupérer leur contenu. But de la manœuvre : atteindre 
une piste d'atterrissage et Tefaire le plein. 
Edité par : Code hAasters 



Une moto de cross ça doit pouvoir se mouvoir sur n'importe quel 
terrain et c'est bien ce que peut faire votre engin puisque l'on 
passe de la terre battue au sable et au macadam. Comme il s'agit 
d'une course, il y a des adversaires qui ne vous souhaitent que du 
mal. De plus les rochers et les troncs d'arbres en travers de la routes 
ne peuvent être évités qu'en pratiquant des wheelings audacieux. 
Bref, vous riquerez souvent de mordre la poussière. 
Edité par : The kît squad 






Le jeu venu du froid risque d'en faire transpirer plus d'un. Le but 
est très simple : il s'agit d'empiler des figures géométriques de 
manière à tracer des lignes. Une fois ces lignes tracées, l'ensemble 
des pièces déjà posées se déplace vers le bas. Mais les autres figures 
continuent leur descente implacable et vous disposez de touches pour 
les faire pivoter, les déplacer latéralement et finalement les laisser 
tomber là où vous le souhaitez. Plus le nombre de lignes formées est 
important et plus vous marquez de points. 
Edité par : Mastertronic 




TWIN TURBO V8 



C'est dans une F-40 que vous commencez cette course qui s'an- 
nonce tourmentée. Les autres pilotes (dans des Porsche) sont eux 
aussi sur la ligne de départ. Au feu vert les moteurs vrombissent et 
le cortège s'élance. Au départ vous disposez de 3 voitures et vous en 
gagnez une à chaque fois que vous terminez une étape. Il n'y a que 2 
vitesses mais celles-ci sont bien suffisantes pour ralentir quand il le 
faut ou dépasser les concurrents. Attention particulièrement aux vi- 
rages en côte qui sont extrêmement dangereux. 
Edité par .-Code Masters 





► Gameover 



Presque un classique parmi les logiciels pour CPC, Game over 
vous met dans la peau d'Arkos le bras droit d'une reine avide de 
pouvoir. Tellement avide d'ailleurs que vous yous révoltez contre 
elle et que vous allez affronter les robots et les monstres qui peuplent 
le monde de la souveraine Gremla. Le jeu est divisé en deux parties 
différentes. Dans chacune d'elles vous disposez d'un laser et de gre- 
nades renouvelables grâce à de petits bidons. A la fin du premier ta- 
bleau il y a un robot géant qui vous résistera 30 coups durant. 
Edité par :Summit 



SUBWAY 
VIGILANTE 




Dans le métro, personne ne vous entend crier. C'est en méditant 
cette phrase de Platon que vous vous retrouvez dans les souter- 
rains de Subway vigilante. Et là, stupeur, des dizaines de skins at- 
tendent leurs victimes quotidiennes. Alors on dirait que tu es le plus 
fort et on dirait que les autres y t'attaquent. Mais malheureusement 
dans les films on est toujours plus fort alors qu'ici les adversaires ont 
besoin d'être envoyé au tapis 4 fois avant d'être hors service. Tandis 
que vous, malgré vos sauts et vos coups de poing, il suffit de deux 
coups bien placés. La vie est dure pour les héros. 
Edité par : Premier 






couleurs qui se mettent en place. Tout 
le monde sait que le mode 1 n'offre que 

uvres couleurs, on se demande al 
comment les bandes de dégradés qui 
arrivent du haut et du bas de l'écran 
peuvent apparaître et pourtant elles le 
font. 

: décors du jeu, très 
d'un scrol ling sans 
'eaux qui se succè- 

nt ainsi des pyramides égyptiennes 

au Moyen Age. 

it, qui dit jeu dit édite 



it de pouvoir vous présen- 




